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Turbo Prolog: 
The Natural Language of 
Artificial Intelligence 


hether you're a first-time 
\ \ programmer or an expe- 

rienced one, Turbo Prolog’s 
natural implementation of Artifi- 
cial Intelligence soon shows you 
how to build expert systems, nat- 
ural language interfaces, custom- 
ized knowledge bases and smart 
information 
management 
systems. | 


Turbo Prolog and Turbo C 
work hand-in-hand 


Turbo Prolog’ interfaces per- 
fectly with Turbo C® because 
they're both designed to work 
with each other. 

The Turbo Prolog/Turbo C 
combination means that you can 
now build powerful commercial 
applications using two of the 
most powerful languages 
available. 


Turbo Prolog’s development 
system includes: 


[¥ Acomplete Prolog compiler that 
is a variation of the Clocksin and 
Mellish Edinburgh standard 
Prolog. 

[W A full-screen interactive editor. 

[¥ Support for both graphic and text 
windows. 

[¥ All the tools that let you build 
your own expert systems and 

AI applications with un- 

precedented ease. 


All Borland products are trademarks or registered trademarks of Borland Interna- 
tional, Inc., or Borland/Analytica, Inc. Other brand and product names are trade- 
marks or registered trademarks of their respective holders. 

Copyright 1987 Borland International BI-1131 














4& An affordable, fast, and 
easy-to-use language that 
will delight the newcomer 
... You experienced Prolog 
hackers will likewise be 
delighted, if not astonished, 
by the features and per- 
formance of the Turbo 
Prolog development 
environment. 

Turbo Prolog offers gener- 
ally the fastest and most 
approachable implementa- 
tion of that language. 


Darryl Rubin, Al Expert b | b | 





How Turbo Prolog’s new Tool- 
box adds 80 powerful tools 
and 8000 lines of source code 


In keeping with Borland tradi- 
tion, we’ve quickly added the 
new Turbo Prolog Toolbox” to 
Turbo Prolog. 

With 80 tools and 8000 lines 
of source code that can easily be 
incorporated into your own pro- 
grams—and 40 sample programs 
that show you how to put these 
AI tools to work—the Turbo 
Prolog Toolbox is a highly intelli- 
gent, high-performance addition. 
Only $99.95! 


Turbo Prolog Toolbox 
features include: 


[W Business graphics generation: 
boxes, circles, ellipses, bar charts, 
pie charts, scaled graphics 

[¥ Complete communications pack- 
age: supports XMODEM protocol 

[MW File transfers from Reflex,° dBASE 
III,° 1-2-3,° Symphony* 

[M A unique parser generator: con- 
struct your own compiler or query 
language 

[MW Sophisticated user-interface design 
tools 

[¥ Contains 40 example programs 

[MW Easy-to-use screen editor: design 

[y 

[y 






















your screen layout and I/O 
Calculated fields definition 

Over 8,000 lines of source code 
you can incorporate into your own 
programs 












Tur 
The most pow 
compi 


ur new Turbo C generates 
QO fast, tight, production- 
quality code at compilation 
speeds of more than 13,000 lines 
a minute! 
It’s the full-featured optimizing 
compiler everyone has been wait- 
ing for. 


Switching to Turbo C, or 
starting with Turbo C, you 
win both ways 


If you're already programming 
in C, switching to Turbo C will 
make you feel like you're riding a 
rocket instead of pedaling a bike. 

If you’re never programmed in 
C, starting with Turbo C gives you 
an instant edge. It’s easy to learn, 
easy to use, and the most efficient 
C compiler at any price. 

Only $99.95! 


&& Turbo C does look like 
What We've All Been Waiting 
For: a full-featured compiler 
that produces excellent 
code in an unbelievable 
hurry ... moves into a class 
all its own among full- 
featured C compilers .. . 
Turbo C is indeed for the 
serious developer... One 
heck of a buy—at any 


pt ice. Michael Abrash, 
Programmer’s Journal b | b | 
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Sieve benchmark 
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Benchmark run on an IBM PS/2 Model 60 using Turbo C version 
1.0 and the Turbo Linker version 1.0; Microsoft C version 4.0 and 
the MS overlay linker version 3.51. 





Technical Specifications 


Compiler: One-pass optimizing com- 
piler generating linkable object 
modules. Included is Borland’s high- 
performance Turbo Linker.” The object 
module is compatible with the PC- 
DOS linker. Supports tiny, small, com- 
pact, medium, large, and huge 
memory model libraries. Can mix 
models with near and far pointers. 
Includes floating point emulator 
(utilizes 8087/80287 if installed). 


Interactive Editor: The system 
includes a powerful, interactive full- 
screen text editor. If the compiler 
detects an error, the editor auto- 
matically positions the cursor approp- 
riately in the source code. 


Development Environment: A power- 
ful “Make” is included so that manag- 
ing Turbo C program development is 
highly efficient. Also includes pull- 
down menus and windows. 


lel 


Links with relocatable object modules 
created using Borland’s Turbo Prolog 
into a single program. 

Inline assembly code. 

Loop optimizations. 

Register variables. 

ANSI C compatible. 

Start-up routine source code included. 
Both command line and integrated 
environment versions included. 
License to the source code for Run- 
time Library available. 
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Join more than 100,000 Turbo C 
enthusiasts. Get your copy of 
Turbo C today! 


Minimum system requirements: All products run on IBM PC, 
XT, AT, PS/2, portable and true compatibles. PC-DOS (MS-DOS) 
2.0 or later. 384K RAM minimum. Basic Telecom and Editor Tool- 
boxes require 640K. 


Borland International 
4585 Scotts Valley Drive, Scotts Valley, CA 95066 
Telephone: (408) 438-8400 Telex: 172373 





Why more than 600,000 
programmers worldwide are using 


Turbo Pascal today 


Turbo Pascal’s worldwide 

success is Borland’s advanced 
technology. We created a com- 
piler so fast, that Turbo Pascal” is 
now the worldwide standard. And 
there are more tools for Turbo 
Pascal than for any other develop- 
ment environment in the world. 


i‘ irresistible force behind 


You'll get everything you 
need from Turbo Pascal and 
its 5 Toolboxes 


Turbo Pascal and Family are 
all you'll ever need to perfect pro- 
gramming in Pascal. 

If you’ve never programmed 
in Pascal, you'll probably want to 
start with Turbo Pascal Tutor® 2.0, 
and as your expertise quickly 
grows, add Toolboxes like our 


¢ Database Toolbox® 
Editor Toolbox® 
¢ Graphix Toolbox® 
° GameWorks?® 
and our newest, 
¢ Numerical Methods Toolbox” 


















And because Turbo Pascal is the 
established worldwide standard, 
3rd party, independent non- 
Borland developers also offer an 
incredible array of programs for 
Turbo Pascal. Only $99.95! 





66 Borland International’s 
Turbo Pascal took the pro- 
gramming world by storm. A 
great compiler combined 
with a good editor at an 
astounding price, the pack- 
age quickly came to be 
called, simply, Turbo—and 
has sold more than 500,000 
copies. 

Stephen Randy Davis, PC Magazine 


Language deal of the cen- 
tury. PC Magazine 








For Scientists and Engineers: 
Turbo Pascal Numerical 
Methods Toolbox 


The Numerical Methods Tool- 
box is a complete collection of 
Turbo Pascal routines and pro- 
grams. Add it to your develop- 
ment system and you have the 
most comprehensive and power- 
ful numerical analysis capabil- 
ities—at your fingertips! 


The Numerical Methods Tool- 
box is a state-of-the-art mathemat- 
ical toolbox with these ten pow- 
erful features: 


[M Zeros of a function 
Interpolation 
Differentiation 
Integration 

Matrix Inversion 
Matrix Eigenvalues 
Differential Equations 
Least Squares 

Fourier Transforms 
Graphics 
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Each module comes with pro- 
cedures that can be easily adapted 
to your own program. The Tool- 
box also comes complete with 
source code. So you have total 
control of your application. 


Only $99.95! 





Turbo Basic, 
Turbo Pascal an 
Turbo Prolog: 
technical 
excellence 





Turbo C, 





&6 Borland International’s Turbo Pascal, Turbo Basic 
and Turbo Prolog automatically identify themselves, by 
virtue of their ‘Turbo’ forenames, as superior language 
products with a common programming environment. 
The appellation also means to many PC users a ‘must 
have’ language. To us Turbo C looks like a coup for 


Borland. _ Garry Ray, PC Week JJ 


BI-1131 





Turbo Basic introduces 
its powerful new Telecom, Editor 


NEW! 


and Database Toolboxes 


urbo Basic® is the break- 
T through you've been waiting 

for. The same power we 
brought to Pascal with Turbo 
Pascal has now been applied 
to BASIC with Turbo Basic. 

Compatible with BASICA, Turbo 

Basic is the high-performance, 
high-speed BASIC you’d expect 
from Borland. 


Basically, Turbo Basic is 
all you need 


It’s a complete development 
environment which includes an 
incredibly fast compiler, an inter- 
active editor and a trace debug- 
ging system. It outperforms all its 
rivals, and because it’s compatible 
with BASICA, you probably 
already know how to use it. 

Includes a free MicroCalc™ 
spreadsheet complete with source 
code. Only $99.95! 
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A technical look at Turbo Basic 


[ Full recursion supported 
[MW Standard IEEE floating-point format 
[W Floating-point support, with full 


tion. Software emulation if no 
8087 present 

[MW Program size limited only by avail- 
able memory (no 64K limitation) 
[W VGA, CGA, and EGA support 

[MW Access to local, static, and global 
variables 

[MW Full integration of the compiler, 
editor, and executable program, 


messages, tracing, and execution 
[YW Compile, run-time, and I/O errors 
place you in the source code 
where error occurred 
[WY New long integer (32-bit) data 
type 





[YW Full 80-bit precision 
[M Pull-down menus 
[W Full window management 











8087 (math co-processor) integra- _ 


with separate windows for editing, © 





66 Borland has created 
the most powerful version 
of BASIC ever. 

Ethan Winer, PC Magazine 5 | 
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Telecom Toolbox is a complete 

communications package which 

takes advantage of the built-in 

communications capabilities of 

BASIC—use as is or modify. 

Pull-down menus and windows 

XMODEM support 

VT 100 terminal emulation 

Captures text to disk or printer 

PhoneBook file 

300, 1200, 2400 baud support 

Supports script files 

Fast screen I/O 

Supports most of XTalk’s 

command set 

¢ Manual dial and redial options 
Use Telecom Toolbox to embed 

communications capabilities into 

your own programs and/or build 

your Own communications pack- 

age. Source code included for 

all Toolbox code and sample 


programs. Only $99.95! 




















For the dealer nearest you or to order by phone call 


(800) 255-8008 
in CA (800) 742-1133 in Canada (800) 237-1136 
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Database Toolbox means that 
you don’t have to reinvent the 

wheel each time you write new 
Turbo Basic database programs. 


[MW “Trainer” shows you how B+ 
trees work. (Simply key in 
sample records and you'll see 
your index being built.) 


[W Turbo Access instantly locates, 
inserts or deletes records in a 
database—using B+ trees. 


[MW Turbo Sort sorts data on single 
items or on multiple keys and 
features virtual memory 
management for sorting large 
data files. 


Source code included. 


Only $99.95! 

















Editor Toolbox is all you need 
to build your own text editor or 
word processor. Includes source 
code for two sample editors. 

First Editor is a complete editor 
ready to include in your programs, 
complete with windows, block 
commands and memory-mapped 
screen routines. 

MicroStar’ is a full-blown text 
editor with a complete pull-down 
menu user interface, and gives you 
* Wordwrap 
* Undo last change 
¢ Auto-Indent 
¢ Find and Find/Replace with options 
° Set left/right margins 
* Block mark, move and copy 
¢ Tab, insert, overstrike modes, line 

center etc. 

Includes source code. 


| Only $99.95! Bi-1131 | 













Magic is easy with Turbo C TOOLS 
in your bag of tricks. New Turbo C 
- TOOLS” from Blaise Computing is a 
- library of compiled C functions that 
allows you full control over the com- 
_ puter, the video environment, and the 
file system, and gives you the jump on 
building programs with Borland’s new 
C compiler. Now you can concentrate 
_on the creative parts of your programs. 


The library comes with well-docu- 
_ mented source code so that you can 

_ study, emulate, or adapt it to your speci- 
fic needs. Blaise Computing’s attention 
to detail, like the use of function proto- 
typing, cleanly organized header files, 
and a comprehensive, fully-indexed 
manual, makes Turbo C 
TOOLS the choice for 
experienced 
software 
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-piler, requires 
DOS 2.00 or 
later and is just 
$129.00 


- fe 
LAISE COMPUTING INC. 


2560 Ninth Street, Suite 316 Berkeley, CA 94710 (415) 540-5441 
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¥% op memory resident applications that can 


ities that you write with Turbo C TOOLS. 
‘© FAST DIRECT VIDEO ACCESS for 











developers as well as newcomers to'C. 


Turbo C TOOLS provides the sophisti- * 
cated, bullet-proof capabilities needed 
in today’s programming environmen 
including removable windows, “si 

kickable” applications, and gener 
interrupt service routines written in C, 


The functions contained in Turbo C 
TOOLS are carefully crafted to supple-- 
ment Turbo C, exploiting its strengths | 
without duplicating its library functions. 
As a result you'll get functions written 
predominantly in C, that isolate hard- 
ware independence, and are small and 
easy to use. 


Turbo C TOOLS embodies the full spectrum 
of general purpose utility functions that are 
critical to today’s applications. Some of the 
features in Turbo C TOOLS are: 


WINDOWS that are stackable and remov- 
able, that have optional borders and a cursor 
memory, and that can accept user input. 

INTERRUPT SERVICE ROUTINE sup- 
port for truly flexible, robust and polite 
applications. We show you how to capture 
DOS critical errors and keystrokes. 


INTERVENTION CODE lets you devel- 
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take full advantage of DOS capabilities. 
With simple function calls, you can schedule 
a Turbo C function to execute either when 
a “hot key” is pressed or at a specified time. 

RESIDENT SOFTWARE SUPPORT lets 
you create, detect, and remove resident util- 


















efficiency, and support for all monitors 
including EGA 43-line mode. 


DIRECTORY AND FILE HANDLING 
support let you take advantage of the DOS 
file structure, including volume labels and 
directory structure. 


In addition to Turbo C TOOLS, Blaise 
Computing Inc. has a full line of sup- 
port products for Microsoft, Lattice 
and Datalight C, Microsoft Pascal 

and Turbo Pascal. Call 
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C PROGRAMMING: Preparing for ANSI C | «16 


by Richard Relph 
The final draft of the ANSI standard for C has ad. at ast 


Richard takes a close look at the standard and how it differs from 
previous C compilers and practices. 


C PROGRAMMING: Backtracking og, 
by Charles Bowman _ 
Backtracking is a common technique for AI programmers using 


_ languages such as LISP. In this article Charles shows how 


backtracking can be a useful tool for C ProeraHunets 4 as well. 


UTILITIES: What’s the DIFF? . 30 


by Don Krantz 

No, this isn't a reprint of the August 1984 article of fhe. same 
name. That one was a file differencer for CP/M Plus i in Pascal; 
this one is for MS-DOS and it’s in C. That's the diff. 

C COMPILERS: Optimizing Compilers for c  . 

by Richard Relph 


The latest compilers from Datalight and Microsoft ca ) 
substantial improvements in code optimization. Richard explains 
the various techniques used and gives crn of the ae | 


code improvements. 
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C CHEST 

by Allen Holub | _ 
Allen explores several techniques for handling a variable 
number of arguments, and updates several oes ee 
curses for MS-DOS. 

16-BIT SOFTWARE TOOLBOX 
by Ray Duncan ii .-Q3- 
OS/2 isn’t the only news in the microcomputer world—Ray 


takes a look at some of the new features of MS-DOs 3. 3 as as” _ 


providing the usual book commentaries and flames.  . 
STRUCTURED PROGRAMMING — 
by Namir Clement Shammas 


Continuing the exploration of language translation, Namir_  _ 


discusses translation code from MS-BASIC to 
ARTIFICIAL INTELLIGENCE 
by Ernest R. Tello’ 


Last month's column explored the bandvare aspects of the Xerox 


1186 AI workstation. This month continues with a discussion of 


LOOPS, the machine's object-oriented pe nine ee 
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by Michael Swaine 
RUNNING LIGHT 
by Tyler Sperry 
ARCHIVES 
LETTERS 
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by Michael Swaine 
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constructs of the new BASICs 
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THE STATE OF BASIC: 44 
CASE statements and ee _ 
146 
_ Products for programmers _ 


VOLUME 12, ISSUE 8 


Wabnniys Journal of 


Software Tools 


About the Cover 
The arrival of ANSI C is something 
many of us are looking forward 
to, but it may be that not all the 
surprises are pleasant ones. 


This Issue — 
Our focus on the C language 
ranges from the cutting edge of 
compiler technology and lan- 
guage extensions to traditional 
programming utilities. 


Next Issue 
So you think you've got it all 
wired just because you've 
memorized the first three 
volumes of Knuth’s Art of 
Computer Programming? Be sure 
to check out next month’s issue, 
which will explore algorithms 
that even Knuth hasn't heard of. 
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rogrammers. Puts volumes 
bea 2 ferenced data at your 


cross-re 
. obi Replaces most manu 


_ keystrokes. Includes 

& compiler for creating 
. your own databases. 
Also available in 


Peter Nortor 
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eS 
The ultimate productivity tool for 


“searches with a few simple 


versions for BASIC, C 
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Nobody ever said programming PCs was 
supposed to be easy. 

But does it have to be tedious and time- 
consuming, too? 

Not any more. 

Not since the arrival of the remarkable new 
program on the left. 

Which is designed to save you most of the 
time you're currently spending searching through 
the books and manuals on the shelf above. 

The Norton On-Line Programmer's Guides™ 
are a quartet of pop-up reference packages that do 
the same things in four differ- 
ent languages. | 

Each package consists of | 
two parts: A memory-resident 
instant access program. 
And a comprehensive, “ 

cross-referenced database “=< 
crammed with just about _— 
everything you need to know to program in your 
favorite language. 
And when we say everything, we mean 
everything. 
Everything from information about language 


Designed for the IBM® PC, PC-AT and DOS compatibles. Available at most software 












announces a 
2 tool for people 


manual 


syntax to a variety of 
tables, including ASCII 
characters, line draw- 
ing characters, error 
messages, memory 
usage maps, important 


data structures and 
more. , 
9 A Guides reference summary 
How much more: screen (shown in blue) pops up on 
Well, the databases Bee A ih 


for BASIC, C and Pas- 
cal give you detailed listings of all built-in and 
library functions. 

While the Assembly database delivers a com- 
plete collection of DOS service calls, interrupts 
and ROM BIOS routines. 

You can, of course, find most of this informa- 
tion in the books and manuals on our shelf. 

But Peter Norton—who’s written a few books 
himself—figured you'd rather have it on your 
screen. 

In seconds. 

In full-screen or moveable half-screen mode. 

Popping up right next to your work. Right 
where you need it. 





OF. 


This, you're probably 
thinking, is precisely the 
kind of thinking that pro- 
duced the classic Norton 
Utilities.™ 





And youre right. 
But even Peter Nor- 
9 e 
Summary data expands on ton can't think of every- 
Pies into pone on thing. 
nd you can select from a wide ° : 
perien of information. Which 1S why there S 


a built-in compiler for 
a databases of your own. 

And why all Guides databases are compatible 
with the instant access program in your original 
package. 

So you can add more languages without spend- 
ing a lot more money. 

To get more information, call your dealer or 
Peter Norton Computing. 

And ask for some guidance. 


Peter Norton- 


COMPUTING 


dealers, or direct from Peter Norton Computing, Inc., 2210 Wilshire Blvd., #186, Santa Monica, CA 90403. 213-453-2361, Fax 213-453-6398, MCI Mail: PNCI ©1987 Peter Norton Computing 
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ID”: has been in- 
terested—make 
that involved—in the 
spread of the C pro- 
gramming language 
since we published 
the source code for 
Ron Cain’s Small C 
compiler back in 1980. 
At that time there was 
no commercial C com- 
piler for a personal enue In the 
intervening years, C has grown to its 
present position as the preeminent 
language for software development 
on and for personal computers. 

Critics of the language can say that, 
like BASIC before it, C is not well 
structured, is hard to read, and is 
hard to maintain. They can't say it is 
unpopular. C’s myriad supporters 
will tell you that it provides all the 
low-level access they normally need; 
that C code, properly written, is well 
structured and is not hard for a C 
programmer to read or to maintain; 
that the language allows both struc- 
ture and freedom; that it is an em- 
powering tool. The supporters’ view 
has prevailed and has led to C’s cur- 
rently being available in any envi- 
ronment you care to name, with 
hordes of compiler vendors riding 
the wave. 

Today an ANSI standard for C has 
all but been established; you'll find a 
discussion of the draft standard in 
this issue. 

So the C programming language is 
uncommonly popular among serious 
developers, is available in almost ev- 
ery conceivable programming envi- 
ronment, and is on the verge of stan- 
dardization. But the waters never 
settle except to be stirred anew. 

Up through this common ground 
of popularity, ubiquity, and stan- 
dardization, a watershed is arising, 
with C product designs flowing in 
one of two directions: toward deeper 
levels of optimization on the one side 
and toward ease of learning, ease of 
use, and speed of the development 
cycle on the other. Thus we see a 




































growing pool of com- 
pilers from Datalight 
and Microsoft, for ex- 
ample, that promise 
optimization technolo- 
gy heretofor only 
available on minicom- 
puters and = main- 
frames; and we also 
see products like Bor- 
land’s Turbo C, Micro- 
soft S Quick C, and Mark Williams's 
Let’s C that promise to extend the 
model of Turbo Pascal or interpreted 
BASIC to C. It is not clear whether this 
parting of the Cs is caused by the Mo- 
ses of market dynamics or by some 
deep tectonics of inherently incom- 
patible programmer needs. But the 
decision to go with the flow and to 
learn/buy/use C now leads to anoth- 
er decision as to which flow with 
which to go. 

And tomorrow? The C program- 
ming language seems so widespread 
that it is more likely to adapt than to 
be replaced. It seems reasonable that 
we will sooner, rather than later, see 
some of the following: 4GLs built on 
top of C, a variety of preprocessors 
and user interfaces, support for dif- 
ferent compilation models, and ex- 
tensions of the C packages sold in the 
direction of rich sets of version con- 
trol tools. 

In the future C will change into 
something rich and strange. 


Michael Swaine 
editor-in-chief 


Dr.Dobb’s Dr. Dobb's journal of 
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Our thanks to NASA for supplying this coil ae ultraviolet photo taken by Skylab IV of a solar prominence reaching out 350,000 miles above the sun’s surface 


Genius Begins With A Great Idea ... 


What follows is the time consuming task of giving 
form and function to the idea. 

That's why we concentrate on building into our soft- 
ware development systems functions and features 
that help you develop your software ideas in less time 
and with less effort. 

We've started 1987 by releasing new versions of 
our MS-DOS, Macintosh, Amiga, ROM, and Apple // 
C development systems. Each system is packed with 
new features, impressive performance, and alittle bit 
more genius. 





Superior performance, a powerful new array of fea- 
tures and utilities, and pricing that is unmatched 
make the new Aztec C86 the first choice of serious 
software developers. 


Aztec C86-p Professional System ... .$199 
¢ optimized C with near, far, huge, small, and large 
memory + Inline assembler + Inline 8087/80287 + 
ANSI support + Fast Float (32 bit) + optimization 
options ¢ Manx Aztec 8086/80x86 macro assembler 
e Aztec overlay linker (large/small model) ¢ source 
level debugger ¢ object librarian ¢ 3.x file sharing & 
locking * comprehensive libraries of UNIX, DOS, 
Screen, Graphics, and special run time routines. 


Aztec C86-d Developer System...... $299 
¢ includes all of Aztec C86-p © Unix utilities make, 
diff, grep © vi editor © 6 + memory models ¢ Profiler. 


Aztec C86-c Commercial System. .... $499 
¢ includes all of Aztec C86-d ¢ Source for library rou- 
tines © ROM Support ¢ CP/M-86 support ¢ One year 
of updates. 


Aztec C86 Third Party Software 

A large array of support software is available for 
Aztec C86. Call or write for information. The following 
is a list of the most requested products: Essential 
Graphics ¢ C Essentials ¢ C Utility Library ¢ Green- 
leaf Com. ¢ Greenleaf General ¢ Halo ¢ Panel ¢ PC- 
lint e PforCe « Pre-C * Windows for C * Windows for 
Data C terp ¢ db Vista ¢ Phact ¢ Plink86Plus ¢ C-tree. 


C compiler, 8080/Z80 assembler, linker, librarian, 
UNIX libraries, and specialized utilities. 


Aztec C ll-c (CP/M-80 & ROM)........ $349 
Aztec Cll-d (CP/M-80)...........05. $199 
Aztec C80 (TRS-80 3&4) ............ $199 





Manx Software Systems 


Amiga user groups across the USA voted Aztec 
C68k/Am release 3.3 the best Software Development 
System for the Amiga. Release 3.4 is more impres- 
sive. 


Aztec C68k/Am-p Professional ...... $199 
A price/feature/performance miracle. System in- 
Cludes: optimized C * 68000/680x0 assembler e 
68881 support ¢ overlay linker * UNIX and Amiga 
libraries © examples. 


Aztec C68k/Am-d Developer ........ $299 
The best of Manx, Amiga, and UNIX. System in- 
Cludes: all of Aztec C68k/Am-p ¢ the Unix utilities 
make, diff, grep and vi. 


Aztec C68k/Am-c Commercial....... $499 
Aztec C68k/Am-d plus source for the libraries and 
one year of updates. 





For code quality, reliability, and solid professional 
features, Aztec C for the Macintosh is unbeatable. 
This new release includes features and functions not 
found in any other Macintosh C development system. 


Aztec C68k/Mac-p Professional...... $199 
® optimized C * 68000/680x0 assembler ¢ 68881 
support ¢ overlay linker ¢ UNIX and Macintosh li- 
braries * examples. 


Aztec C68k/Mac-d Developer........ $299 
The best of Manx, Macintosh, and UNIX. System in- 
Cludes: all of Aztec C68k/Am-p ¢ the Unix utilities 
make, diff, grep ¢ vi editor. 


Aztec C68k/Mac-c Commercial ...... $499 
Aztec C68k/Am-d plus source for the libraries and 
one year of updates. 


Aztec C65 is the only commercial quality C com- 
piler for the Apple Il. Aztec C65 includes C compiler, 
6502/65C02 assembler, linker, library utility, UNIX li- 
braries, special purpose libraries, shell development 
environment, and more. An impressive system. 


Aztec C65-c Commercial ........... $299 
¢ runs under ProDOS ® code for ProDOS or DOS 3.3 
Aztec C65-d Developer............. $199 


e runs under DOS 3.3 ¢ code for DOS 3.3 
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Radio Shack, Amiga TM Commodore | nt'l. Unix TM AT&T, Vax TM DEC. Aztec TM Manx Software System 


An IBM or Macintosh is not only a less expensive 
way to develop ROM code, it’s better. Targets include 
the 6502/65C02, 8080/Z80, 8086/80x86, and 680x0. 

Aztec C has an excellent reputation for producing 
compact high performance code. Our systems for 
under $1,000 outperform systems priced at over 
$10,000. 


Initial Host Plus Target............. $750 
Additional Targets ................ $500 
ROM Support Package............. $500 


Call for information on Vax, PDP-11, Sun and other 
host environments. 


These C development systems are unbeatable for 
the price. They are earlier versions of Aztec C that 
originally sold for as much as $500. Each system 
includes C compiler, assembler, linker, librarian, 
UNIX routines, and more. Special discounts are 
available for use as course material. 


C’ Prime ..... ccc cece cece ce auceacs $75 


Most Aztec C systems are available as cross devel- 
opment systems. Hosts include: PC/MS-DOS, Mac- 
intosh, CP/M, Vax, PDP-11, Sun, and others. Call for 
information and pricing. 


To become a user call 800-221-0440. From NJ or 
international locations call 201-542-2121. Telex: 
4995812 or FAX: 201-542-8386. C.0.D., VISA, 
MasterCard, American Express, wire (domestic 
and international), and terms are available. One 
and two day delivery available for all domestic and 
most international destinations. 

Aztec C is available directly from Manx and from 
technically oriented computer and software stores. 
Aztec Systems bought directly from Manx have a 30 
day satisfaction guarantee. 

Most systems are upgradable by paying the differ- 
ence in price plus $10. Site licenses, OEM, educa- 
tional, and multiple copy discounts are available. 


To order or for more information call today. 


In NJ or international call (201) 542-2121 e TELEX: 4995812 
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ast month I of- 

fered the impos- 
ter theory to explain 
that fellow on the 
right and his necktie. 
The fact that neckties 
cut off the vital flow of 
oxygen to the brain 
has always encour- 
aged me to stay as far 
away from them as 
possible. Thus my doppelganger the- 
ory for the photo of the new editor at 
DDJ. 

This month, however, you'll no- 
tice we have virtually the same pho- 
to as last month. Doesn't this seem 
odd to you? I mean, this guy’s been 
wearing the very same shirt and tie 
for a solid month now, and he’s still 
smiling? There’s definitely some- 
thing strange going on here. 

I thought about it quite a bit, and I 
have a possible explanation. My the- 
ory is that the guy is a robot, an au- 
dioanimatronic device like Disney- 
land’s Mr. Lincoln. Once a month 
they wheel him out, plug him into 
the wall so his eyes will light up, take 
the picture, and then shove him back 


in the closet. It’s a fantastic theory, of 


course, and there’s probably nothing 
to it. Still.... What if someone was 
replacing people in the computer 
community with robots? How many 
replacements would it take before 
we noticed something was amiss? 


This robot hypothesis goes a long» 


way toward explaining some of the 
strange things you see in computer 
magazines today. For example: how 
is it that someone could write a posi- 
tively glowing ‘‘preview’’ of Bor- 
land’s Turbo C months before the 
program had shipped and when the 
only information available was a 
pitch from a a company representa- 
tive and a short demonstration of the 
program? How could a responsible 
journalist do something like that? 
With my theory, the answer be- 
comes obvious: a real journalist 
wouldn't act that way, but a robot 
could easily be programmed for the 





job. Just set some glob- 
al variables (such as 
PRAISE = Max; CON- 
TENT = Min) and 
there you have it. No 
more troubles with 
freelance writers, no 
more deadline hassles, 
and no more unhappy 
advertisers. What 
could be better for a 
magazine? 

Well, despite all those advantages, 
the folks here at DDJ are still operat- 
ing with the traditional organic pro- 
cessors. Bit-slice editors and colum- 
nists would be faster, but they'd lack 
the experience and judgement that 
makes a magazine worth reading. So 
though this is our annual C issue, I 
have to confess we don't have a rush 
review of a new compiler. In the 
near future, we'll no doubt have 
some interesting things to say about 
Turbo C (and Microsoft's Quick C) but 
first we have to do our homework 
and actually spend some time evalu- 
ating the products. 


One last thing before I go. If you're 
a hotshot on either operating systems 
or 68000 programming, give me a call 
at (415) 366-3600 and sell me on a bril- 
liant article idea. The December and 
January issues are coming up fast, 
and I still haven't filled all the pages. 


Tyler Sperry 
editor 


Ten Years ago in DDJ 

“The neologism ‘modem’ stands for 
modular-demodulator. The need for mo- 
dems arose when somebody wanted to 
send a digital signal to New Medford (for 
example) and noticed that there was a tele- 
phone line going to New Medford. But the 
telephone lines only carried audio. So this 
somebody made a device that turned a 0 
into a 1070 Hz tone and a 1 into a 1270 Hz 
tone. This was a modulator. At the other 
end (probably in New Medford) a device 
was built that translated a 1070 Hz tone 
into a 0 and a 1270 Hz tone into a 1. This 
was a demodulator. Very much like a Ccas- 
sette interface.’ — “Sour Notes on a Penny- 
whistle,’ Jef Raskin, DDJ, August 1977. 

“Dear Editor Persons: Do you think this is 
too drawn out to have the desired effect? 
(That is, wide eyes with dilated pupils, soft 
blue glow around the head (caused by 
surge in the Force), disorientation, repeat- 
ed pronouncements such as ‘wow’ and ‘fa- 
far-faarrout .) 

“On the other hand, if it were shortened 
to remove the fun and games, would it be 
appreciated by people who hadn't thought 
of the idea already? 

“By the way, is it original? I wrote this 
between 12 and 2 in the morning .. . — 
letter that accompanied manuscript “On the 
Effects of Filling Cavities Within the Fillings 
of Cavities Within . . .,”. Steve Whitham, DDJ, 
August 1977. 


C Notes 

“Alexander Graham Bell invented the 
tin ear, so maybe it’s not surprising that 
Bell Lab’s best software should have names 
like UNIX and C.”—“‘Binary Trees with Tiny- 
C,’ Les Hancock, DDJ, June/July 1979. 

“C is a disease. When I see people writ- 
ing spreadsheets in C, I think, “They're out 
of their minds.’ It was designed to write 
operating systems. Modula-2 is good for 
that [writing spreadsheets]. We'll do a C. 
We'll do a C because everyone wants a C. 
But in Europe C is seen as an American dis- 
ease, and here people are trying to spread 
it.''"—Philippe Kahn, quoted in The Software 
Designer, DDJ, October 1984. 


DDJ in a Nutshell 

“Dr. Dobb’s Journal began as a forum for 
sharing information and ideas about pro- 
gramming and computers. It continues to 
be a place to present new languages, utili- 
ties, tools, applications, algorithms, discov- 
eries, and techniques to the microcomput- 
ing community. Our authors primarily 
come from within our readership, and it is 
this reader involvement that has sustained 
and guided DDJ throughout the years.’’— 
Editorial, Reynold Wiggins, DDJ, April 1984. 


Dr. Dosp's OURNALof 


OM PU 
Pig 


Running Light Without Overbyte 





Dr. Dobb’s Journal, August 1987 


The Fastest C 


We challenged Microsoft-C to a C compiler duel, measuring compile, link, and execution 
times. They wouldn’t take on Optimum-C — they own it and they know how fast it is! 


DATALIGHT’s new Optimum-C compiler 
can make your programs run up to 30% faster 
than other compilers. That’s because it’s a 
true optimizing compiler. While many 
manufacturers may claim to have optimizing 
compilers, they can’t stand up against 
Optimum-C. Their optimizers look at only 
one or maybe a few statements at a time; 
Optimum-C takes in the BIG picture, looking 
at an entire function at once. 

Optimum-C tunes each function to the 
machine by maximizing register usage while 
minimizing memory usage. Optimizations 
performed include: global common subex- 
pression elimination, register allocation 
by coloring, copy/constant propagation, 
loop induction variables, and dead code 
elimination. 


Develop Programs Faster 


‘Io save compile time during code develop- 
ment, you can turn off the optimization. 
Then, when your program is developed and 
debugged, you can turn on the optimization 
and recompile for the fastest execution speed. 

Also included to help you with code 
development is the EZ interactive editor/ 
environment. With EZ you can compile, link, 
execute and quickly correct any syntax errors 
by letting EZ show you the erroneous source 
line and error message. 


Library Source Code and Other Extras 


‘Top speed is only one of the advantages you 
get with Optimum-C. You also get complete 
library/startup source code (at no additional 
charge) support for 4 memory models 
(including large model), inline 8087 code, and 
standard object files. Plus a complete UNIX 
style MAKE program and a fast screen I/O 
package. 


Speed ROM Development 


It used to be that to develop ROM code you 
had to purchase a compiler from one manu- 
facturer, a debugger from another, and other 
tools from still another. DATALIGHT has 
eliminated all the hassle by providing all the 


support tools necessary for ROM 
development. 
BENCHMARKS 
Sieve Pointer Optimize 
Optimum-C = 49.3 45.7 00.9 
MS C 58.6 90.2 38.6 
Turbo-C 62.1 49.0 40.2 


ROM-it, the Unique 
ROM Development Kit 


Only DATALIGHT offers you the kind of 
support you'll find in Rom-z/, the new ROM 
support package. This unique package speeds 
up the delivery of your ROM application by 
providing many program elements that you 
used to have to write for yourself. 

Rom-zt includes a startup routine that 
can take an 8086 from restart to C program 
execution by setting up segment registers, 
stack, heap, copying initialized data from 
ROM to RAM, and zeroing uninitialized 
data. The BLAZE locator/Intel hex file 
generator can locate code and data anywhere 
in memory, while performing checks for 
ROM overruns, illegal data access, and 
complete program location. The ROMable 
library contains the ROMable portions of the 
Optimum-C library, with support for inter- 
rupt handling in C, reading and writing I/O 
ports, and full math support. 


Debug ROMed Code from the PC 


You can download, execute, and debug 
programs on the target system from your PC, 
with Remote-DSD. This debugger is a sym- 
bolic windowing debugger that shows you the 
C source code (on the PC) that is executing 
on the target system. You can view and change 
global variables on the target system, modify 
data, set breakpoints and watch registers and 


flags. 
Try Optimum-C risk free 


Call us TOLL FREE today for your copy of 
Optimum-C. You will also receive free* ‘“‘C: 
A Programming Workshop” to get you 
started with C. To find out how we can help 
you get your ROM projects completed on 
time call us. 


Optimum-C w/ C Tutorial $139 
Rom-zt $159 
Add $7 for shipping in US/$20 outside US 
COD (add $2.50) 
Not Copy Protected 


ORDER TOLL-FREE TODAY! 
1-800-221-6630 


ATTENTION OEMs! 


Contact us regarding arrangements. 





*Limited offer available exclusively to readers who 
purchase directly from Datalight. 
Microsoft and MS-DOS are registered trademarks 
of the Microsoft Corporation. Turbo C 1s a regis- 
tered trademark of Borland International. 
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Magazine Reviewers Shocked by 
DATALIGHT?’s Performance... 


“Reviewing this compiler was quite a surprise 
for us. For such a low price, we were expecting 
a “lightweight”? compiler. What we got was 
a package that is as good as or better than 
most of the “‘heavyweights.”’ Datalight C 
implements a complete C language. It also 
compiles quickly, doesn’t take up much disk 
space, and looks impressive in the bench- 
marks.” 


DR. DOBBS, August 1986 


“This is a sharp compiler!... what is impres- 
sive is that Datalight not only stole the com- 
pile time show completely, but had the fastest 
Fibonacci executable time and had excellent 
object file sizes to boot!” 


COMPUTER LANGUAGE, February 1986 


Optimum-C Version 3.08 
NEW! 


EZ Interactive Development Environment 


NEW! 
Inline 8087/80287 Math Support 


Full UNIX System 5 C language plus 
ANSI extensions 

Fast/tight code via powerful 
optimizations including common sub- 
expression elimination 

DLC one-step compile/link program 
Multiple memory model support 
UNIX compatible library with PC 
functions 

Compatible with DOS linker and 
assembler 

Third-party library support 
Automatic generation of .COM files 
Supports DOS pathnames, wild cards, 
and Input/Output redirection 
Compatible with Lattice C version 3.x 
Interrupt handling in C 

Debugger support 

ROMable code support/start-up source 
Full UNIX MAKE Program 

‘Tools in Source Code: cat, diff, ... 


MS-DOS* Support Features 


Mouse support 
Sound support 
Fast screen I/O 
Interrupt handler 


Datalight 


17505-68th Avenue NE, Suite 304 
Bothell, Washington 98011 USA 
(206) 367-1803 
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Clear, Compact Code 

Dear DDJ, 

While reading ‘‘Dimensional Data 
Types’ by Do-While Jones (May 
1987), I sat stunned in disbelief. He 
seems to miss the boat on virtually 
every point he tries to make. 

‘‘Compact code is no longer neces- 
sary or desirable.’ Several responses 
to this absurd statement immediately 
come to mind. But, as this is a family 
publication, just ask Microsoft about 
its Windows project. Just about every 
compiler advertised in your maga- 
zine boasts about its compact code 
generation. Compact code must be 
important to somebody. A wise engi- 
neer once told me, ‘If software ig- 
nores the hardware, you can be sure 
that the hardware will ignore —— 
the software.” 

“The big money is now 
starting to go to people who 
can write clear code.’ Mr. | _ 4 
Jones seems to imply that | _ 


complex code and clear (that im 


is, properly documented) 
code are mutually exclusive. 


Again this is absurd. Some of (5 Le 


the prettiest and cleanest 
code I have ever seen was a 
telecommunications system 
written in 8080 assembly lan- | 
guage. I can also just about | 
guarantee that the assembly- 
language code would be 
smaller and faster than the 
equivalent written in Ada (if 
an Ada could be found that 
ran on a small system). Ada, 
Pascal, and Modula-2 are not 
synonymous with clean and 
easy to maintain code. Some 
of the ‘‘dirtiest’’ production 
code I have worked on has 
been in Pascal. Another wise 


10 


programmer once said, ‘‘A real pro- 
grammer can write FORTRAN in any 
language.” 

‘What makes this program difh- 
cult to validate and maintain is the 
cryptic number 335,300,000.’ Al- 
though I agree with Mr. Jones’ state- 
ment, the way he made the program 
“uncryptic” was to add two pages of 
unit definitions so that the constant c 
could be defined and then divided by 
2. It seems to me that, with the addi- 
tion of one constant declaration and 
a coniment line, the “bad” program 
could have been much easier to read 
than wading through the “good” 
(that is, longer) code. 

“The overhead isn’t as bad as it 
looks.”’ I guess that, in a large, aca- 
demic, mainframe Ada environment 
in which everything is slow, com- 
pile/link/load/execution times are a 
mere nit. I wish my customers were 
as forgiving. To use Mr. Jones’ analo- 
gy of bank computers balancing 
checkbooks, I wonder which system 
bank presidents would want—a tight 
software system that gives them an- 
swers faster or an inefficient one that 
takes longer but has “‘cleaner’’ code? 
I guarantee that they don't care what 





FUNCTION PROTOTYPES: 
Don’t leave home without them. 


care how quickly the machines can 
give them information. 

“Programmers should no longer 
waste time combining constants be- 
cause the compiler should do it any- 
way.” Do most programmers know 
what code their compiler actually 
generates? I doubt it. Do all compilers 
do this because Mr. Jones thinks they 
should? I doubt it. 

Contrary to popular belief, per- 
formance still matters. CPU time is 
not infinite. Memory is not unlimited 
(virtual memory included). In the ac- 
ademic world unpleasantries such as 
the hardware can be ignored. In the 
real world, they cannot. 

Eric Lundquist 

Centurion Dealers Computer Corp. 

402 West Bethany 

Allen, TX 75002 


Programmer’s Hell 
Dear DDJ, 
‘Factoring in Forth” by Michael Ham 
(October 1986) makes almost every 
mistake in the book. Although the 
author waxes eloquent about factor- 
ing, he gives listings that illustrate the 
three cardinal sins of Forth. 
Although it is common to recom- 
mend short Forth definitions, you 
should not lose sight of two of 
the original aims of the lan- 
guage: compactness and 
__| speed. Each time you decom- 
_| pose a definition, you pay a 
penalty in time and space. 
Therefore, factoring is worth- 
while only if one of the fol- 
lowing two conditions is met: 
some of the components may 
be useful in other construc- 
tions, or the components con- 
tain some genuine ideas that 
may well be separated so that 
you can analyze their imple- 
mentation. Listing Six in the 
article provides an ideal bad 
example—the only term used 
later is @BIT, which is fac- 
tored using four new defini- 
tions. You could, however, 
define it more efficiently us- 
ing only standard terms: 


: @BIT SWAP 8 /MOD ROT + 


C@ SWAP 0 DO 2/ LOOP 1 AND 
NEG ; 
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To Develop Tomorrow’s Applications, 
You Need The DOS Of The Future. 


LEMON - DOS 


THE MULTITASKING, MULTIUSER MS-DOS REPLACEMENT 


RUNS ON ANY IBM-PC, XT, AT, 80386, OR TRUE COMPATIBLE 


RUNS MS-DOS PROGRAMS AND USES THE MS-DOS FILE SYSTEM 
FEATURES FILE SHARING AND FILE LOCKING 

PROVIDES TRUE CONCURRENT MULTITASKING AND TASK SWITCHING 
SUPPORTS MULTIPLE TERMINALS WITH NO EXTRA SOFTWARE REQUIRED 
FEATURES A USER-CONFIGURABLE WINDOWING INTERFACE 

ALLOWS ADDRESSING OF EXTENDED MEMORY 

FEATURES A FILE PERMISSION SYSTEM 


SUPPORTS THE MS-DOS COMMAND LANGUAGE AND EXTENDS IT WITH COMMANDS LIKE 
PROTECT, PRIV, SPAWN, AND KILL 


ONLY *99 — DISKETTES AND MANUAL INCLUDED 


And You Need The Tools To Get The Job Done Right... 


WEIN -00S5° 


APPLICATION DEVELOPER'S KIT 


GIVES ACCESS TO OVER 80 NEW SYSTEM SERVICES SUPPORTED BY WENDIN-DOS 


as LIBRARIES WRITTEN IN ASSEMBLY FOR ACCESS FROM HIGH-LEVEL LANGUAGES 
LIKE 


ALLOWS USER PROGRAMS TO ACCESS SYSTEM SERVICES FOR PROCESS CONTROL, 
SWAPPING, MEMORY MANAGEMENT, RECORD AND FILE MANAGEMENT, AND CONCURRENT 1/O. 


PROVIDES AN I/O SUBSYSTEM THAT SUPPORTS CONCURRENT I/O OPERATIONS ON ANY OF 
THREE DIFFERENT LEVELS OF ACCESS: PHYSICAL, LOGICAL, AND VIRTUAL. 


ONLY °99 — DISKETTE, SOURCE CODE AND MANUAL INCLUDED 


TO ORDER WENDIN-DOS or THE WENDIN-DOS APPLICATION 
DEVELOPER’S KIT — CALL (509) 624-8088 or 


SIMPLY SEND A BRIEF, WRITTEN REQUEST FOR INFORMATION ABOUT ANY WENDIN PRODUCT TO: 


PLAT INILIJM ....;. Wendin, Inc. 
Oo LEV LY 


FLEXIBLE DISKETTES P.O. Box 3888 
Spokane, WA 99220-3888 
We will send you an exciting full color catalog and a FREE product line demo diskette, 
while supplies last, compliments of Syncom Technologies, Inc., and Wendin, Inc. (509) 624-8088. 
(System hardware recommendation — minimum 512K and for multitasking a machine with at least the computing power of an IBM-AT.) 



























® DEALER INQUIRIES WELCOME 
Foreign orders inquire about shipping. MS is a trademark of Microsoft. PC-DOS is a 

BOX 3888 Domestic orders add $6.00/ 1st item, $1.00 trademark of IBM. 

SPOKANE, WA 99220-3888 each additional item for shipping, handling, and 

ae insurance. We accept Niles eral leh eatin sacuieaaaaiesi Maines 
i i i ‘D, nk Drafts drawn on endin is a registered tr , Inc. 
Working beyond the horizon to cevelop the operating systems of tomorrow ware es D., and Ba Wendin-DOS and Wendi DOS Application 
> Copyright 1987 Wendin, Inc. (S09) 624-8088 Washington residents add 7.8% sales tax. Developers Kit are trademarks of Wendin, Inc. 
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LETTERS 
(continued from page 10) 


(I use a DO so that nn DO does noth- 
ing.) Whether you want to introduce: 


- AIM SWAP 8 /MOD ROT + 


depends on how often you intend to 
use this, but the other three new 
terms are useless; one—S>B—is a 
synonym for 0<>. Who needs it? 

Mr. Ham likes to make definitions 
using CREATE and then storing. He 
should use VARIABLE and ALLOT. This 
is not a pecadillo. In debugging Forth 
you need to know what words do. 
You can consider the dictionary as 
being divided into primitives and 
high-level terms. Primitives are ma- 
chine-code definitions; there has to 
be some way of flagging them. Then 
you need a disassembler to see what 
is there. The high-level terms are 
those defined in terms of primitives 
and other high-level terms. On the 
first level, you have two species—de- 
fining words using ;CODE and defin- 
ing words using DOES>. Those that 
use ;CODE should be few in number 
so they can be traced. Typical exam- 
ples are : and VARIABLE. You recog- 
nize a colon definition by looking at 
the contents of its CFA. For DOES> 
there is no problem because the con- 
tents of the CFA signal a DOES> defi- 
nition and the first word of the pa- 
rameter field points to the address 
where the procedure is given. In- 
stead of the definition of BITS given 
in the listing, Mr. Ham should have 
used: 


VARIABLE BITS 6 ALLOT 


This tells anyone that BITS is a storage 
word because its CFA will contain the 
address of the ;CODE procedure for 
VARIABLE. 

Finally, Listing Five contains a di- 
saster—VECTOR:. This is a defining 
term that creates words requiring an 
input, and wrong input here could 
destroy a disk. When you do any seri- 
ous programming, you make lots of 
mistakes before you get it right. The 
most serious problem with Forth is 
that it lets you do anything you want, 
including making catastrophic mis- 
takes. The most common source of 
such errors is storing data in the 
wrong place because you may over- 
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write code. At best you wont en- 
counter the code you have de- 
stroyed. At second best you get a 
crash. At worst you may have creat- 
ed new code that makes sense but 
writes nonsense to a disk directory. 
I’ve done this too often. 

Mr. Ham goes one better with his 
execution arrays—he seems to think 
the big issue is a matter of changing 
the name VECTOR: to EMPOWER. He 
lists: 


4 DO-OPTION ( unpredictable results ) 


where DO-OPTION is defined using 
VECTOR:. It would be nice if the re- 
sults were unpredictable, but I'll tell 
you what will happen: the CPU will 
start reading a location in memory as 
if it were instruction code. If you're 
lucky, it reaches nonsense code be- 
fore much has happened and a mere 
crash results. If you are unlucky, it 
will start executing something that is 
indeed unpredictable, but it may be a 
disk-write or it may be a change in 
DOS. The chances of wrecking a disk 
are not negligible, even if small (de- 
stroying a hard disk even once a year 
is not worth it). 

The fact is that a definition such as 
VECTOR: should send its perpetrator 
to Programmer's Hell. (The CASE 
statement could do what Mr. Ham 
wants with complete safety and no 
new defining terms.) Regardless of 
the language being used, the first 
duty of any programmer designing 
an interactive program is to antici- 
pate wrong input from users. This is 
the hardest part of programming. At 
the least, users pressing the wrong 
key should not cause a catastrophe. 
What are called ‘“‘user friendly” pro- 
grams generally have an easy time— 
they are genuinely ‘‘programmer 
friendly’ because the users have lim- 
ited options. Command-driven pro- 
grams, especially those written in 
Forth, let users make many mistakes. 
Some of these are their responsibil- 
ity: if they have to type ENDEDIT to 
leave a word processor, it’s not the 
programmer's duty to worry about 
whether they wanted to save first. In 
contrast, if typing 4 instead of 3 
wrecks a disk instead of taking you to 
DOS as you intended, you may be 
tempted to enter the capital punish- 








ment debate on the wrong side. 
Carl Herz 
McGill University 
Mathematics & Statistics 
805 Sherbrooke West 
Montreal, OB 
Canada H3A 2K6 


Michael Ham replies: 

I agree with Carl’s two conditions re- 
garding when a name is needed but 
add also a third: factor when a name 
will make the code more readable. 
Compactness and speed are, of 
course, desirable, and if the addition- 
al definition has a serious negative 
impact on these, by all means re- 
think the factoring. But I find that in 
looking at code long after I wrote it, I 
am greatly helped by names. S>B 
(single to Boolean, named by analogy 
with S>D) helps me understand 
what is happening in a way that 
0<> does not. Another example: I 
typically use the definition 0 CON- 
STANT US>D to be able to use the in- 
formative label US>D (unsigned sin- 
gle converted to double) in my source 
code rather than a mysterious 0. Sim- 
ilarly, AIM was easier for me to read 
and remember than were the words 
in its definition. In the application I 
wrote, the speed and size penalties 
were negligible. 

Of the definitions +BIT, -BIT, 
(Q@BIT, and ~BIT, it is true, as Carl 
points out, that I used only @BIT in 
the column. I should have made it 
clearer that the other words were of- 
fered for the reader’s toolbox, should 
he or she sometime want to set, un- 
set, or toggle a bit in addition to fetch- 
ing it. 

I appreciate Carl’s suggestions of 
using VARIABLE when creating ar- 
rays of constants. The values within 
the variable can then be set with Cl. 
(Values beyond the variable can still 
be stored with C, and so the ALLOT is 
not needed in this case.) His approach 
certainly works, and I recommend it 
to those who make heavy use of 
disassemblers. 

I also agree with Carl’s warnings 
about the disasters that can ensue 
from executing random locations in 
memory. I have never had the mis- 
fortunes he describes, but I can un- 
derstand that they are possible. I am 

(continued on page 140) 
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Kaypro Corporation’s 
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the new KAYPRO 386. 
In speed, power, and 
performance, the 
KAYPRO 386 is at the 
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The KAYPRO 386, 
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microprocessor, runs 
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advantage? Experience, 
pure and simple. 





Seeing is Believing. 

To fully appreciate what 
the KAYPRO 386 can do, 
see it in action at your 
nearest Kaypro dealer. 
Put the KAYPRO 386 to 
the test. It’s faster than 
you think. 
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Texas Instruments has 
system developers need. 


“Personal Consultant™ Plus eo offers Personal Consultant Plus 3.0 Standard Features 


- Frames, rules, meta rules and procedures 
— Forward/backward chaining 


@ ; 
a very fine expert system development et 
— End-user explanation facilities 
— Graphics image capture and display 


® 
and delivery tool that already has “nears dase Lar", 00 es 
.EXE or .COM programs, “C” 
— Complete LISP development environment 
— 2-megabyte expanded/extended memory support 


a proven. record with end-users.” a Or = 
— Susan Shepard, Al Expert 


- “Getting Started” tutorial-style manual 


Personal Consultant images 
— Optional add-on package to PC Plus (3.0) 
— Allows integration of “active images” into 
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Power tools. 








knowledge bases 

- Interactive dials, gauges, forms and selection 
images 

- Multiple images can be combined on same 
screen 

- “Getting Started’ tutorial-style manual 


-ersonal Consultant Online 

- Optional add-on package for PC dea hee 

- ONLINE expert systems that interact directly with 
process data 

- Multiple interfaces to data acquisition and 
analysis programs 

- Knowledge base synchronization with process 
data 

- Functions for historical and predicted trends 

- oa user interface/reporting capabilities 

- “Getting Started’ tutorial-style manual 





Among all the expert system devel- 
opment tools available for personal 
computers today, none deliver the 
power and flexibility of TI’s Personal 
Consultant series. 

Personal Consultant Easy is ideal for 
getting started, and is upwardly com- 
patible with the higher functionality of 
PC Plus. For experienced developers, 
Personal Consultant Plus and its 
optional add-on enhancements, Online 
and Images, were designed to help solve 
a broader range of complex problems. 


Personal Consultant Plus. Full power 
for an affordable price. 

At $2,950, PC Plus has proven to be 
one of the richest and most flexible 
problem-solving tools available for the 
development of complex knowledge- 
based systems. Designed to take 
advantage of today’s more powerful 
286/386 DOS-based computers, or TI’s 
Explorer™ Symbolic Processing System, 
the new 3.0 version of PC Plus provides 
powerful standard features and a contin- 
uing growth path with the addition of 


either PC Images or PC Online, or both. 


Personal Consultant Images. Picture 
an expert system with interactive 
graphics. 

At $495, PC Images enables developers 
to create knowledge-based applications 
that incorporate complex graphical 
“active images.” User-interactive dials, 
gauges, forms and selection images pro- 
vide a more exciting visual data input 
and output style. 


Personal Consultant Online. The 
expert system as part of the process. 
At $995, PC Online allows the devel- 
oper to design expert systems which 
interact directly with process data, as 
opposed to input from a human oper- 
ator. Designed for intelligent process 
monitoring applications, this optional 





package helps deliver expertise that is 
“online all the time.” 


Application delivery as flexible as the 
tools themselves. 

Delivery can be in LISP for flexibility, 
or “C”* for maximum speed and porta- 
bility. Our “C” options support either 
stand-alone or “embedded” knowledge 
bases. Options are available for DOS- 
based PCs, TI’s Explorer, and DEC’s 
VAX™ line of multi-user minis running 


under VMS™. 





“Texas Instruments has done more 
than any other company to educate 
people about AI, to popularize it, and 
to make useful AI tools available at 
reasonable prices.” 

— Jim Seymour, PC Magazine. 
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Knowledge Engineering Services are 
available for the Personal Consultant 
products. If you have a question about 
any of our expert system power tools, we 
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advantage. 
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ANSI C 





by Richard Relph 


s most of you know 
A by now, there is an 
effort afoot by the 


American National Stan- 
dards Institute (ANSI) to 
standardize the C lan- 
guage. Some articles about 
the standard, most of them 
pretty general and glossy, 


have appeared in various magazines. This article is in- 


tended to be specific and useful. I hope to give you an 
idea of how the standard may be different from the C 
you re used to, how it will affect the code you have 
already written, and how you can minimize your ad- 
justments to the new compilers by taking certain actions 
now. 

Make no mistake, ANSI C is coming. Microsoft, AT&T, 
IBM, and many other companies are actively participat- 
ing in the standard process by sending representatives 
(usually compiler writers) to the ANSI C committee meet- 
ings, which are held once every three months. Many of 
these companies, including AT&T, have announced that 
they will provide ANSI-conforming compilers. Although 
the standard will probably not be formally accepted un- 
til early 1988, nearly all the issues have been settled. The 
current working document (called the draft) will proba- 
bly be changed very little before it becomes ‘‘the’’ 
standard. 

I've written this article in a format similar to the orga- 
nization of anormal C source file. After discussing a few 
general items from the standard, I'll discuss preproces- 
sor directives, module-scope declarations, function defi- 
nitions, function bodies, and the final topic will be 
libraries. 


Richard Relph, 846 Salt Lake Dr., San Jose, CA 95133. Rich- 


ard is a software and hardware consultant. He has written 
compilers and embedded systems. 
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What changes will you need 
to make your programs 


work with 
an ANSI ‘compiler? 





General Items 

To get around limitations 
in certain standard charac- 
ter sets, the committee has 
introduced ‘“‘trigraphs.” 
Trigraphs are three-char- 
acter sequences, beginning 
with 2?, that the compiler 
nealiees with a character 


that cannot be entered airoctly into a given machine— 


for example, ??= is used for #, 7?! for |, and so on. I 
doubt that trigraphs will see much use in the U.S., but in 
certain countries they'll make the difference between 
only admiring C and being able to use it. Note that tri- 
graphs are replaced even inside strings. 

One problem area the standard addresses is the name 
space of programs. Which names are permissible for 
programmers to use, which are reserved by the compil- 
er, and which are used by the library has always been 
an open issue. | 

The new standard includes a rule that says all 
names beginning with — belong to the implemen- 
tation and should not be used by any program. Also, 
any identifiers specified in the standard as keywords, 
functions, or macros are reserved, regardless of wheth- 
er or not the header file that defines the function or 
macro is included. All other names belong to the 
programmer. 

In order to allow programmers to write programs 
and be able to compile them on any machine that 
has an ANSI-conforming compiler, several compilation 
limits have been given lower bounds. These are de- 
scribed in Table 1, page 18. In addition, all types have 
been given minimum ranges, which are provided to a 
program through a header file. Basically, char objects 
are a minimum of 8 bits, shorts are 16 bits or more, ints 
are at least as big as shorts, and longs are a minimum of 
32 bits. 
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The Preprocessor 

The preprocessor has always been a part of C but sepa- 
rate. Because of this, and its lack of certain features, the 
preprocessor has fostered more implementation differ- 
ences than any other part of C except the library. Now 
the preprocessor is a part of the language, specified 
with the same rigor as any other part. 

Simple #define directives are the same as before—you 
can still define an identifier to mean something else. 
What has changed is the range of possibilities. The big- 
gest changes are ‘‘string-izing,” token pasting, and re- 
cursive definitions. 

Because it’s often convenient to be able to use a pa- 
rameter both inside and outside a string, a string-izing 
preprocessor operator has been defined. Consider the 
following example: 


#define val(x) printf(”x = %d\n”, x ) 
val( xyzzy )is replaced either by: 
printf ”"xyzzy = %d\n", xyzzy ) 

or by: 

printf(”x = %d\n", xyzzy ) 

In the past, compilers could not be relied upon to re- 
place the occurrence of a formal argument within a 
string literal with the actual argument. In fact, K & R 
specified that string literals were just that and they 
should not be scanned for replacement. The facility is 
useful, however. 

So, # occurring before the name of a formal argument 
is now replaced by the actual argument, as in the fol- 


lowing example: 


#define val(x) printf( #x ” = %d\n", x ) 
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is always replaced by: 


” mw 


printf "xyzzy” ” = %d\n", xyzzy ) 


which is equivalent to: 
printf("xyzzy = %d\n", xyzzy ) 


This example also shows another new feature—adja- 
cent string concatenation. The standard specifies that 
adjacent (in the token sense, disregarding white space) 
string literals shall be combined into a single string liter- 
al. This means that ’1” "2" 3” is identical to ” 123”. 

Another useful but nonstandard feature of some im- 
plementations is token pasting—the creation of a single 
token from two separate ones. Many C compilers pro- 
vide this facility with the following mechanism: 


#define x1 23 
#define m(z)z/* */1 


Here m( x ) is replaced by x1, which in some compilers is 
replaced by 23. The new, approved way to do the re- 
placement all the way to 23 is: 


#define x1 23 
#define m(z)z##1 


so that m( x ) produces 23. 

In the past the single most reliable way to break a C 
compiler (and use up inordinate amounts of CPU time 
and memory space) was to write a sequence such as: 


#define x x 
x 


This should no longer wreak havoc. The standard 
says that a macro, once expanded, turns itself off for the 


17 





ANS! C 
(continued from page 17) 


duration of rescanning. This has potential usefulness in 
statements such as the following: 


(int) sizeof 
unsigned char 


#define sizeof 
#define char 


These fragments depend on another new feature of the 
draft—that of defining keywords. 

Include files are related to both the preprocessor and 
library issues. The standard now specifies which include 
files must exist and their contents. The list of include files 
that must exist is provided in Table 2, below. Note that the 
files from this list are the only required files and should 
be used when referring to a standard function or macro. I 
cannot recommend strongly enough that you should in- 
clude these files when a definition is needed. 

Including these files has several advantages. First, a 
prototype is provided for each of the related functions, 
which aids in diagnosing improper library usage. (I'll dis- 
cuss prototypes later in this article.) Second, some func- 
tions, such as printf, require a prototype before use be- 
cause they take a variable number of arguments. Such 
functions cannot be called with maximum efficiency on 
some machines (including the 8086), and therefore the 
compiler is allowed to require you to specify when it 
must use suboptimal code. Third, many compilers al- 
ready (and more will) define ‘internal’ functions for im- 
portant library functions. 

Such functions as memcpy and strcpy can often be per- 
formed in-line (without a function call) with a great in- 
crease in speed and very little increase in code space. 
(MetaWare, for example, already uses in-line function ex- 
pansion for some functions.) Fourth, many library func- 
tions do not modify one or more arguments. In such situa- 
tions, the compiler need not worry about such functions 
disrupting an optimization because the library declara- 
tions in the header files provide the compiler with the 
needed information. Without this information, the com- 
piler must assume that the function modifies anything it 
can. 

Many of these advantages may not be present in com- 


“levels” of statements 

nesting levels of conditional compilation directives 

type modifiers per declarator 

levels of parentheses 

characters in 2 cases of significance in internal names 
characters in 1 case of significance in external names 

external names in one source file 

local variables per block 

macros per source file at any time 

parameters to either a function or macro 

characters in a ‘‘logical’’ source line 

characters per string constant 

bytes in a single object 

nesting levels of include files 

cases in a switch statement 





Table 1: Lower bounds of several compilation limits 
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pilers for some time, but rest assured that they will be 
eventually. Many vendors that build Pascal and C compil- 
ers could easily take advantage of the more optimal call- 
ing convention provided by Pascal. And many recently 
released compilers support type-checking features to aid 
library usage diagnosis. 


Module-Scope Declarations 

The next major section of your program, after the #in- 
cludes and #defines, is usually module-level declarations 
and definitions, which is where variables manipulated 
by the source file are declared or defined. The standard’s 
principle changes here concern types. 

Characters still have implementation-defined signed- 
ness, although all types from char through long may have 
specified signedness via the unsigned and signed type 
modifiers. Signed is required only for chars and bit fields 
as all other types default to signed. 

There are now three floating-point types—float, dou- 
ble, and long double (note that long float is no longer 
acceptable). 

There is also a new type called enum, which allows 
programmers to associate named values (not unlike #de- 
fined values) to variables of enum type. No new function- 
ality is created here, only an aid to documentation. The 
classic example is: 


enum color { red, blue, green, white }; 
enum color pixel; 


Here, enum color is a type (just as struct tag is) to which the 
values red, blue, green, and white apply, and pixel is an 
instance of an enum color variable. Certain features of 
enum are important to keep in mind. First, red can appear 
anywhere an integer constant can appear, even in ex- 
pressions that do not involve the enum color type. As a 
result, only one enum can declare the name red. Further, 
no variables can be so named. A variable with enum type 
behaves identically to an integer in any expression. If the 
compiler determines that a particular set of enum values 
fits in a smaller type, it is free to allocate less space to any 
objects of that enum type. Last, you can specify values for 
any or all of the names in enum. 


The New Void 
The ANSI standard also 
gives C a void type, 
which is useful in three 
contexts: function re- 
turn types, pointed to 
types, and prototypes. 
Many existing C com- 
pilers implement void- 
type functions. These 
‘functions’ are really 
procedures that do 
things but don’t return a 
value. Examples include 
exit and longjmp (which 
don't return at all) and 


free. 


Void pointers 


float.h 
limits.h 
stddef.n 
assert.h 
ctype.h 
locale.h 
math.h 


setjmp.h 
signal.h 
stdarg.h 
stdio.h 
stdlib.h 
string.h 
time.h 





Table 2: Include files that 


must exist are 
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Performance... 


High-speed data access and low data 
redundancy ...two benefits of using 
Raima’s db_VISTA database develop- 
ment system. Use it as a simple ISAM 
file manager or design complex 
databases. This network model DBMS 
performs where others fail — guaran- 
teed! Written in C for fast, portable 
applications. 


fast... 


It’s fast — almost 3 times faster than a 
leading competitor. Fast access that comes 
from the unique combination of the B-tree 
indexing method and the “‘network 
mode!l”’ or direct “set’’ relationships 
between records. A winning combination 
for fast performance. 


new db_QUERY ~ 


Add our new C-linkable, SQL-based, ad 
hoc query and report-writing companion 
product to provide a simple relational 
view of db_VISTA’s complex network 
model database. Without compromising 
speed. Ask for db_ QUERY! 


portable... 


db_VISTA and db_QUERY operate on 
most popular computers and operating 
systems. You can write applications for 
micros, minis, or even mainframes, 


allowing the same C applications to run 
under MS-DOS, UNIX, and VAX VMS. 


multi-user... 


db_VISTA has multi-user capability 
and supports simultaneous users in either 
multi-tasking or local area networking 
environments. 


here’s how... 


Design your database and compile your 
schema file with the database definition 
language processor. Develop application 
programs, making calls to db_VISTA’s C 
functions. Edit and review your database 
using the Interactive Database Access 
utility. Compile and link your C program 
with the db_VISTA run-time library, and 
your application is ready to run. 


RAIMA" 


CORPORATION 


kt 





C PROGRAMMERS! 


d b VI STA: fast C Database 


now offers SQL-based Query 


source code... 


We make our entire C Source Code 
available so you can optimize performance 
or port to new environments yourself. 


efficient... 


db_VISTA uses space efficiently. It lets 
you precisely define relationships to 
minimize redundant data. It is non-RAM 
resident; only those functions necessary 
for operation become part of the run-time 
program. 


royalty free... 


Whether you’re developing applications 
for yourself or for thousands, you pay for 
db_VISTA or db_ QUERY only once. No 
extra run-time charges. 


free support... 


Raima’s software includes free tele- 
phone support and software updates for 
60 days. Technical support personnel are 
available to answer questions about our 
software or yours. New Bulletin Board 
Service too! 


order now... 


It’s easy — simply call toll-free. We'll 
answer your technical questions and 
get you started. Call today. 


BASICS, ADVANCED, INTERNALS 
September 14-18 


Call for on-site training and further info. 


db. VISTA Royalty Free 


Prices 
Object w/Source 
@ Single-User $ 195 §$ 495 
@ Multi-User $ 495 $ 990 
M@ VAX Multi-User $ 990 $1,980 


@ db_QUERY prices — same as above. 

B db_REVISE $ 990 $1,980 
M@ New! Developers Package $ 425 
includes db_VISTA, Dan Bricklins Demo, 

C-scape 


array 
aD 


30 DAY MONEY-BACK GUARANTEE! 
























db_VISTA 


Features 





@ Multi-user support allows flexibility to 
run on local area networks 

¢ Access provided directly through B-tree 
indexing or the network “set” relation- 
ships. 

¢ Transaction processing assures multi- 
user consistency : 

¢ Application Record and File Locking 

¢ SQL-based db_QUERY is linkable 

¢ File transfer utilities included for ASCII, 

dBASE optional 

Royalty-free run-time distribution 

Source Code available 

Data Definition Language for specify- 

ing the content and organization of your 

files 

Interactive database access utility 

Database consistency check utility 

Key file build utility 

ASCII file import and export utility 
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Record and File Sizes 


¢ Maximum record length limited only by 
accessible RAM 

@ Maximum records per file is 16,777,215 

@ Maximum file size limited only by avail- 
able disk storage 

@ Maximum of 256 index and data files 

@ Key length maximum 246 bytes 

@ No limit on number of key fields per 
record 

@ No limit on maximum number of fields 

per record 





System & Compiler Support 


¢ Operating systems: MS-DOS, PC-DOS, 
UNIX, XENIX, UNOS, ULTRIX, Micro- 
port, Macintosh, VMS 

# C compilers: Lattice, Microsoft, IBM, 
DeSmet, Aztec, Turbo C, XENIX and 
UNIX 

# LAN systems: LifeNet, NetWare, PC 

Network, 3Com, SCO XENIX-NET 

Also works with most C libraries. 


what others say... 


“Tf you are looking for a sophisticated C pro- 
grammer’s database, db_VISTA is it. Raima’s 
customer support and documentation is excel- 
lent. Source code availability and a royalty-free 
run-time is a big plus.’ 

Dave Schmitt, President 
Lattice, Inc. 


‘“‘db__VISTA has proved to be an all-around high 

performer in terms of fast execution, flexibility 

and portability, and has undoubtedly saved us 
much time and development effort.’ 

John Adelus, Hewlett-Packard Ltd. 

Office Productivity Division 


call toll-free today! 





1 (800) db-RAIMA 


(that’s 1-800-327-2462) 


3055 - 112th N.E., Bellevue, WA 98004 USA ®¢ (206) 828-4636 ¢ Telex: 6503018237 MCIUW « FAX: (206) 828-3131 
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pointers that do not point at anything in particular but 
that can point to anything. Malloc returns a void pointer, 
and free accepts one. The neat thing about void pointers is 
that they can be assigned to any pointer and can be as- 
signed from any pointer. So all those malloc, calloc, and 
realloc calls no longer need to have casts in front of them. 
And now you finally have a way to store a pointer with- 
out having to invent some fake type for it. 

The last use of void is in prototypes, which I'll discuss 
later in the section on function definitions. 

Const and volatile are new keywords that are used in 
variable declarations and definitions. Const tells the com- 
piler that the associated object cannot be modified (by the 
compiler’s generated code). It serves mostly to aid the 
compiler in determining where objects can be placed and 
to help the compiler warn of an attempt to modify the 
object—although a clever compiler realizes that once the 
value has been fetched, it need never be fetched again. 
Volatile is a directive to the compiler that every pro- 
grammed read and write of the object must take place as 
specified. A compiler cannot optimize out reads or writes 
to such objects. Usually, volatile objects are either I/O ob- 
jects (such as a UART registers) or semaphores of some sort. 

External objects have also changed in a couple of ways. 
First, each such object must be ‘“‘defined”’ exactly once. A 
definition is a declaration outside the scope of any func- 
tion that does not include the keyword extern. Unlike 
Unix, you cannot (portably) define an object more than 
once. Second, each such object must (unenforceably) be 
unique in the first six (yes, 6) characters without regard to 
case distinctions. Note that this restriction does not apply 
to any “internal” names. 


Function Definitions 

The use of prototypes is probably the most significant 
change to the language that the committee has made. Us- 
ing them will improve documentation, help the compiler 
detect stupid mistakes, generate better code, enhance 
portability, and assure compatibility with future C stan- 
dards. I alluded to many of these features when I dis- 
cussed include files. 

A prototype improves documentation because it de- 
clares the type (and optionally the name) of the argu- 
ments to a function. For example, the standard function 
memcpy could have the following prototype declaration: 


void **memcpy‘ void *dest, const void *src, size_t n ); 


This declaration tells the compiler that memcpy is a func- 
tion that returns a pointer to an unspecified object. It 
takes exactly three parameters—the first has the name 
dest, the second src, and the third n. The first two param- 


the machine. Finally, the second parameter is a pointer to 
an area in memory not modified by the function. 

Not including a prototype for a function that takes a 
variable number of arguments could be fatal. The reason 
is this: C is almost unique in its ability to deal with func- 
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tions that take a variable number of arguments. Pascal, 
Modula-2, Ada, and FORTRAN cannot deal with user-pro- 
vided functions that take a variable number of argu- 
ments. Because of this, the callee (the function being 
called) can’t use instructions designed to clean up the 
stack on function exit. In the 8086, for example, the RET 
instruction has an optional operand that specifies the 
number of bytes to be added to the stack pointer after the 
return address has been fetched. Instead of this, the func- 
tion has to use a simple RET, and the calling function (say, 
main) has to clean up the stack when it gets control back, 
usually with an ADD SP,n instruction. Not only is this se- 
quence slower but it is also larger because the ADD ap- 
pears everywhere a call to printf occurs rather than once 
at the end of printf. Of course, this requirement does 
mean that if the caller and the callee disagree about the 
number of arguments, at least the stack doesn’t get mis- 
aligned. 

To let C use the faster return mechanism, ANSI says, in 
essence, that you must tell the compiler the names of all 
functions that take a variable number of arguments. The 
way you do this is by supplying a prototype. If the last 
argument ina prototype is ..., then the compiler knows 
that the function takes a variable number of arguments 
and therefore that it must use the larger, slower return 
mechanism. It is important to note that the standard spec- 
ifies that the compiler, upon encountering a call to a func- 
tion that it does not have a prototype for, can assume that 
the function takes a fixed number of arguments of the 
supplied types (after promotion). 

The header files supplied with an ANSI-conforming 
compiler include prototype information for each func- 
tion in the library. 

The last problem with prototypes is how you specify 
that a function takes no arguments because void foo( ); is 
already legal. This is where the keyword void shows up 
again. To declare a function that takes no arguments, you 
place void between the parens. 


Function Bodies 

The only changes to the language that affect actual code 
are all enhancements except for one, which is a 
clarification. 

Switch expressions can be any integral type, up to and 
including unsigned long. Floating-point expressions can 
be evaluated in any of the floating-point types. Structures 
(and unions) can be passed to and returned from func- 
tions or assigned. Arrays can have their addresses taken, 
and the resultant value is of type pointer to array, which 
is decidedly different from pointer to first element of 
array. 

Two subtle changes are of great importance to 8086 
programmers. First, sizeof does not return an int (it is 
size_t, defined in stddef.h), and malloc and related func- 


_ tions expect size_t-type quantities when dealing with 
eters are pointers to unspecified objects, and the last isan | 
integral type large enough to hold the number of bytes in | 


numbers of objects (usually chars). The other change is 
that pointers to functions are different from pointers to 
data. 

The only new operator is unary +. With it you can 
force the compiler to evaluate subexpressions by them- 
selves instead of in the context of some larger expression. 
For example, a*b/c could be evaluated either by multi- 
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plying a and b then dividing by c, or by dividing b by c 
and then multiplying by a. Now you can specify the or- 
der, if you think it isimportant. The expression a * +(b/c) 
(note the unary plus) forces the compiler to do the divide, 
whereas +(a * b)/c forces the compiler to do the multi- 
ply. This construct does not force the compiler to do ei- 
ther one first (although it is hard to imagine how these 
examples could be done otherwise), it merely forces the 
compiler to fully evaluate the subexpression by itself 
without combining it with any other components of the 
expression. 

The last item I'll mention here is unsigned vs. value- 
preserving conversions. The following code has two pos- 
sible answers, depending on which of the two conversion 
rules you apply: 


unsigned char uc; 


mith, x 
uc = 2; 
7 
x = ((uc* i) / 2); 


The only place in which this is a problem is when an 
unsigned quantity is expanded in size in the course of one 
subexpression and this subexpression is expanded yet 
again; shifted right; or isan operand of /,%,<, <=, >,or 
>= as part of a larger expression. 

In the unsigned-preserving case, (uc * i) produces an 
unsigned int (value Oxfffe), which when divided by 2 
yields 0x7fff and gives (signed) x the value 32,767. In the 
value-preserving case, (uc * i) produces a signed int (if all 
possible unsigned chars are representable in a signed int) 
with value -2 (hex Oxfffe), which when divided by 2 
yields -1 (hex Oxffff). This example shows a case in which 
value preserving is useful, but I could show other exam- 
ples in which unsigned preserving is better behaved. All 
this is irrelevant if you use casts. In my example, the 
placement of an int cast before either the uc or the (uc * i) 
would have caused the same result to be produced in 
either case. Most code works equally well in either envi- 
ronment, so don't lose any sleep about this issue. In fact, 
in all the source code for Unix, I can’t think of a single 
instance in which this matters. 


Libraries 

An important change to the C language is that a library is 
now specified. All hosted implementations must provide 
all the functions specified. Table 3, right, lists all the func- 
tions to be included in prototype form. Note that the open, 
read, write, close, creat, and unlink functions are all miss- 
ing from this set. These were deemed the domain of the 
operating system and somewhat redundant, given fopen 
and so on. 

Library function names and macros are reserved. The 
reason is so that function a in the library can reliably call 
function b without worrying that the programmer has 
replaced b with a function of his or her own. It also allows 
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the compiler to recognize these functions and to generate 
special code for them if it wants to. 

The name-space issue I mentioned under “General 
Items” will create some problems in the near term as 
compiler vendors try to decide what to do about the now 
“nonstandard” functions in their libraries that have 
names that do not belong to the implementation. Two 
possible solutions exist. The first is to deliver these func- 
tions as an add-on library, preserving their names in this 
library separate from the standard library. The other is to 
change the names of these functions in the standard li- 
brary to have leading underscores and then provide 
header files that users can include that define each of the 





assert.h void assert( int expression ) 
ctype.h int isalnum( int c ) 
int isalpha( int c ) 
int iscntrl( int c ) 
int isdigit( int c ) 
int isgraph( int c ) 
int islower( int c ) 
int isprint( int c ) 
int ispunct( int c ) 
int isspace( int c ) 
int isupper( int c )_ 
int isxdigit( int c ) 
int tolower( int c ) 
int toupper( int c ) 
char *setlocale( int category, char “locale ) 
double acos( double x ) 
double asin( double x ) 
double atan( double x ) 
double atan2( double y, double x ) 
double cos( double x ) 
double sin( double x ) 
double tan( double x ) 
double cosh( double x ) 
double sinh( double x ) 
double tanh( double x ) 
double exp( double x ) 
double frexp( double value, int *exp ) 
double Idexp( double x, int exp ) 
double log( double x ) — 
double log10( double x ) _ 
_ double modf( double value, double *iptr) 
_ double pow( double x, double y ) 
double saqrt( double x ) 
doubie ceil( double x ) 
- double fabs( double x ) 
double floor( double x ) 
double fmod( double x, double y ) 
int setimp( jmp—buf env ) 
void longjmp( jmp—buf env, int val ) 
void ( *signal( int sig, void ( *func )( int )))( int) 
int raise( int sig ) 
void va_start( va_list ap, parmN ) 
type va_arg( va_list ap, type ) 
void va_end( va_list ap ) 
int remove( const char “filename ) 
int rename( const char “old, const char *new ) - 
FILE *tmpfile( void ) 
char *tmpnam( char *s ) 
int fclose( FILE “stream ) 
int fflush( FILE *stream ) 


locale.h 
math.h 





setjmp.h 
signal.h 


stdarg.h 


stdio.h 


Table 3: All functions that must be included 
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tdlib.h 


old function names in terms of the new names. I prefer | 


the latter approach as it gives me the ability to edit the 
“old” names I wish to be visible without editing the li- 
brary or my source files and I can also use the functions 
(nonportably) by using their _ names. It also lets imple- 
mentors continue to rely on the existence of these func- 
tions by using the _ versions. 


Conclusion 

ANSI Cis coming, and it is good. Unlike many (dare I say all) 
previous language standards, this effort looks as though it 
will genuinely help portability of C programs without 
harming most existing programs. I believe that you can 


FILE *fopen( const char “filename, const char *mode ) 
FILE *freopen( const char *filename, const char *mode, 
FILE *stream ) 
void setbuf( FILE *stream, char *buf ) 
int setvbuf( FILE “stream, char “buf, int mode, size_t size ) 
int fprintf( FILE *stream, const char *format, ... ) : 
int fscanf( FILE *stream, const char *format, ... ) 
int ptintf( const char *format, ... ) 
int scanf( const char *format, ... ) 
int sprintf( char *s, const char *format, ... ) 
int sscanf( const char *s, const char *format, ... ) 
int vfprintf( FILE *stream, const char *format, va_list arg ) 
int vprintf( const char “format, va_list arg ) 
int vsprintf( char *s, const char *format, va_list arg ) 
int fgetc( FILE *stream ) 
char *fgets( char *s, int n, FILE *stream ) 
int fputc( int c, FILE *stream ) 
int fouts( const char *s, FILE “stream ) 
int getc( FILE *stream ) 
int getchar( void ) 
char “gets( char *s ) 
int putc( int c, FILE *stream ) 
int putchar( int c ) 
int puts( char “s ) 
int ungetc( int c, FILE *stream ) 
size_t fread( void “ptr, size_t size, size_tnmemb, FILE 
*stream ) 
size_t fwrite( const void *ptr, size_t size, size_t nmemb, 
FILE *stream ) 
int fgetpos( FILE *stream, fpos_t “pos ) 
int fseek( FILE *stream, long int offset, int whence ) 
int fsetpos( FILE *stream, const fpos_t “pos ) 
long int ftell( FILE *stream ) 
void rewind( FILE *stream ) — 
void clearerr( FILE *stream ) 
int feof( FILE *stream ) 
int ferror( FILE *stream ) 
void perror( const char *s ) 
double atof( const char *nptr ) 
int atoi( const char *nptr ) 
long int atol( const char *nptr ) 
double strtod( const char *nptr, char **endptr ) 
long int strtol( const char *nptr, char **endptr, int base ) 
unsigned long int strtoul( const char *nptr, char**endptr, int 
base ) 
int rand( void ) 
void srand( unsigned int seed ) 
void *calloc( size_t nmemb, size_t size ) 
void free( void *ptr ) 
void *malloc( size_t size ) 
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string.h 


time.h 


write important programs that will run reliably on any 
computer that supports an ANSI C environment without 
changing even a single line of code. 

One last warning: there can be no truly ANSI-conform- 
ing compiler until the standard is adopted. Any compiler 
vendor claiming conformance prior to that isn’t telling 
the whole truth. Further, unless such compilers address 
the name-space issue, they never will be conforming. 


DDJ 
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void *realloc( void *ptr, size_t size ) 

void abort( void ) 

int atexit( void ( “func ){ void )) - 

void exit( int status ) 

char *getenv( const char * name ) 

int system( const char “string ) 

void “bsearch( const void “key, const void*base, size_t 
nmemb, size_t size, int ("compar )( const void *, 

const void y 

void qsort( void ase size_t nmemb, size_t size, int — 

(*compar )( const void *, _ 

const void *)) 

int abs( int j ) 

div_t div( int nymer, int denom , 

long int labs( long int j ) 

Idiv_t Idiv( long int numer, long int desea) 

void *memcpy( void *s1, const void *s2, sizen) _ 

void *memmove( void *s1, const void *s2, size_t n) 

char *sircpy( char *s1, const char *s2) _ _ 

char “strncpy( char *s1, const char *s2, size_t A) 

char “strcat(char*si1,constchar*s2) 

char “strncat( char *s1, const char *s2, size_tn) © 

int memcmp( const void *s1, const void *s2, size_t nj) 

int stremp( const char *s1, const char *s2) _ 

int strncmp( const char *s1, const char *s2, size_t n) 

size_t strcoll( char *to, size_t maxsize, const char “from ) | 

void *memchr( const void *s, int c, size_tn) — . 

char *strchr( const char *s, intc ) 

size_t strcspn( const char *s1, const char "s2) 

char *strpbrk( const char *s1, const char *s2 ) 

char *strrchr( const char *s,intc) 

size_t strspn( const char *s1, const char *s2) _ 

char “*strstr( const char *s1, const char *s2 ) 

char *strtok( char *s1, const char*s2) _ 

void *memset( void *s, int c, size_tn) 

char *strerror( int errnum ) 

sizet strien( const char *s ) 

clock_t clock( void ) : 

double difftime( time_t time1, time_t timeO ) 

time_t mktime( struct tm *timeptr ) 

time_t time( time_t *timer ) 

char *asctime( const struct tm *timeptr ) 

char *ctime( const time_t *timer ) 

struct tm “gmtime( const time_t *timer ) 

struct tm “localtime( const time_t *timer ) | 

size_t strftime( char *s, size_t maxsize, const char ae 

const struct tm *timeptr ) : _ 
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ost of the time, program- | 
MM ming is a straightforward 
matter. You analyze the 


problem, select the appropriate data 
structures and algorithm, and—after 
a certain amount of work—you've 
finished. Granted, the first solution 
might not be as fast as youd like, or 
as elegant, but at least you have the 
advantage of knowing the problem is 
solvable. But what about those occa- 
sions when the path to a solution 
isn’t so clear? This article is about a 
programming method—called back- 
tracking—that is commonly used in 
AI programming. In contrast to nor- 
mal methods, in which you program 
all the steps required to attain your 
goal, you can use this approach 
when even the existence of a solu- 
tion can’t be guaranteed. 

Backtracking belongs to a general 
class of programming methods 
termed nondeterministic program- 
ming (NDP). In NDP you don’t code the 
solution to your problem—you pro- 
gram a method that will lead to a so- 
lution. The program literally makes 
guesses until it either finds a solution 
or exhausts the available alterna- 
tives. Moreover, there can be more 
than one solution for a given prob- 
lem. This method has obvious bene- 
fits in AI theory and expert systems 
development. 

Backtracking is a programming 
method in which you proceed along 
a given ‘‘path” searching for a solu- 
tion. At each fork in the road, you 
make a guess as to which path you 


Charles F. Bowman, 24 Jacques Ave., 
Staten Island, NY 10306. Charles is a 
consultant and is currently writing a 
textbook on data structures. He holds 
an M.S. degree from New York 
University. 
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Backtracking 


There are two types of backtrack- 
ing: chronological backtracking (CBT) 
and dependency-directed backtrack- 
ing (DDB). 


Chronological Backtracking 


| CBT is effectively an exhaustive 





should follow to continue your 
search. If this choice should prove 
unsuccessful—that is, if you encoun- 
ter a dead end—you back up and try 
a different path. The execution con- 
tinues in this manner until you ei- 
ther reach a solution or exhaust all 
the possible choices. The latter condi- 
tion signifies that no solution exists, 
and the program should exit with an 
indicative status. If you think that 
this sounds similar to a depth-first 
traversal, you are correct. The only 
significant difference is that with 
backtracking the decision tree is im- 
plicit rather than explicit. 


| 1: bktkfind( : 
| 2: begin 
- if( node = 
then : 
return 
endit 
: for( each ch 


do 








ret_stat s 
a child node ) 

if( ret stat = SUCCESS ) 
return( ret stat ) 

endif 

done 

return( FAIL ) 

endproc 





Example 1: Pseudocode for a 
chronological backtracking function 








_| search, similar to that discussed earli- 


er. Each solution path is attempted, 


| in what is tantamount to a random 


order, until one of two outcomes is 
determined. 

Consider the pseudocode in Exam- 
ple 1, below, for example. If at any 
time a solution is found (lines 3 - 6, 9 - 
13), the function returns a value indi- 
cating success. If not, it must try an 
alternate choice (lines 7 — 14). If all the 
alternatives have been exhausted 
(line 7), a value indicating failure is 
returned, forcing the function to 
back up to a previous path (line 15) 
before continuing the search. 

There are two important points to 
consider here. First, whenever you 
perform a backup, you must restore 
the previous environment before 
trying the next path. Obviously, this 
can become very expensive. Second, 
backtracking is typically implement- 
ed using a recursive procedure, 
which yields an algorithm that is ex- 
ponential in order of execution mag- 
nitude (also costly). The following 
paragraphs discuss methods of im- 
proving the basic algorithm. 


Dependency -Directed 
Backtracking 
Dependency-directed backtracking 
(DDB) works essentially as described 
earlier but tries to eliminate some un- 
necessary searching in two ways. 
First, as the name implies, you can 
backtrack to choices that are depen- 
dent on the dead end. That is, you 
back up until you reach a point at 
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which a dependency was created 
and continue searching from there. 
As an example, consider a case in 
which you are searching for a solu- 
tion that requires four conditions (A, 
B, C, and D) to be satisfied. Further, 
assume you reach a state in your pro- 
cessing at which conditions A and B 
are satisfied but C and D are not. In 
lieu of just automatically backtrack- 
ing to the previous fork, you contin- 
ue on to a point at which A and Bare 
still true and resume the search from 
there. You can skip all the interven- 
ing paths. 

The second way to eliminate un- 
necessary searching is called prun- 
ing. If you reach a point in the search 
at which it becomes obvious that any 
further effort on a given path is fruit- 
less, you can eliminate the remain- 
der of the subtree from that point on- 
ward (that is, force a backtrack to 
occur). Pruning is a straightforward 
approach and is often implemented 
in game-playing simulations. You 
could, for example, write a chess 
program that could determine its 
next move by assigning a quantum 
value to each board position it exam- 
ines. At any given point, it would se- 
lect the move that yields the most ad- 
vantageous (highest) value. If the 
algorithm were to traverse a path 
representing the loss of a player’s 
queen, it could elect to eliminate any 
further searching along that trail. 

For the sake of completeness, I 
should also mention a third method 
of improving a backtracking proce- 
dure: explicitly managing a stack. Re- 
cursive procedures are costly be- 
cause of the considerable amount of 
overhead required for each succes- 
sive call. Your program must save 
registers, store a return address, allo- 
cate local storage, and so on. Most of 
this information is not directly relat- 
ed to the problem at hand and, there- 
fore, having to save and restore it 
only wastes CPU cycles. You can save 
time and space (at the expense of pro- 
grammer effort—there really is no 
such thing as a free lunch!) if you 
code the stack explicitly. You can ac- 
complish this easily by transforming 
the algorithm from its recursive 
form to an iterative one and main- 
taining the to-do list in an applica- 
tion-controlled data structure. (Note 
that recursion is a really just a form 
of iteration.) 
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SETL 
My first encounter with backtrack- 
ing occurred when I attended gradu- 
ate classes at New York University. 
The students and faculty had devel- 
oped a language called SETL (Set Lan- 
guage), which featured a pair of 
built-in primitives (OK /FAIL) that sup- 
ported backtracking. As an example, 
consider the classic eight-queens 
puzzle. The challenge is to place all 
eight queens on a chess board such 
that no two queens are attacking 
each other. Example 2, below, pre- 
sents an SETL solution to the problem. 
Some of the constructs might ap- 
pear strange, but what’s important to 
note is how the two primitives, OK 
and FAIL, can free the programmer 
from dealing with some of the low- 
level details that would otherwise be 
required. Line 3 of the example ini- 
tializes a language-controlled stack so 
that each time the statement OK is 
executed, a snapshot of the execution 
state is saved. (Actually, each variable 





Example 2: Eight-queens problem 


that you want saved must be identi- 
fied at declaration time.) Lines 4, 5, 
and 6 compute all the currently unat- 
tacked (that is, available) positions 
and stores them in the variable unat- 
tacked. If none exist for a given board 
configuration (line 7), the function 
executes the FAIL statement on line 9 
and backtracks; if unattacked is non- 
empty, one position is selected ran- 
domly (line 11) and stored in posn. 
When the forall loop terminates, the 
board positions are printed. 


An Acrostic Example 

As is customary in DDJ articles, I’ve 
included the source code for a dem- 
onstration program (see Listing One, 
page 50 ). This program is, however, 
slightly less serious than those you 
usually find in DDJ. The program, 
called kross, solves acrostic puzzles 
using a backtracking algorithm. 
Youre probably familiar with this 
type of puzzle—examples can be 
found in just about every newsstand 
puzzle magazine. If you're not, an 
acrostic puzzle is simply a crossword 
puzzle without the clues: you are 
supplied with the words and the dia- 
gram and, through trial and error, 
you must enter all the words into 
their appropriate slots (see Figure 1, 
below). 

The program requires one argu- 
ment—the name of the file contain- 
ing a description of the puzzle (yes, 
you have to type the puzzle in!). The 
file is divided into two sections. The 
first is a description of the puzzle dia- 
gram: a series of lines—one for each 
row—containing either blanks or mi- 
nus signs (this can be modified by the 
user, if desired). These characters 
represent the black boxes and the ac- 
tual character locations, respective- 
ly. The second section is just the list 
of words, one per line, that the pro- 
gram will use to solve the puzzle; 
they can be entered in any order. 

A couple of notes: all puzzle-de- 
scription lines must be of equal 
length (the program checks for this). 
Also, take the time to ensure that all 
the words are spelled correctly. The 
program, as you would expect, is un- 
forgiving in this regard. 

Example 3, page 26, contains a 
sample input file for the puzzle of 
Figure 1, and Example 4, page 26, 
contains the output generated by the 
program. 
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BACKTRACKING 
(continued from page 25) 





The overall operation of the pro- 
gram is straightforward: read the 
puzzle and word list into internal 
data structures; search for a solution; 
and if there is a solution, print it. The 
actual backtracking logic is in the 
function solve( ). This is a recursive 
procedure that: 


e Chooses and determines the size of 
the next puzzle slot to fill (horizontal 
or vertical). This processing is per- 
formed by the function next( ) and is 
by necessity a rather messy bit of 
code. 

¢Selects at random (that is, sequen- 
tially) an appropriately sized word 
from the available list. The function 
itfits( ) is called to ensure that a given 
word fits into the slot (in typical 
crossword puzzle fashion). 

If the word fits, enters it into the 
puzzle. At this point, with the aid of 
the function enter( ), a snapshot of 
the current state (puzzle) is saved. 
¢Recursively calls itself to continue 
toward a solution. 

eIf at any point a solution is found 
(that is, there are no more slots to fill), 
returns the value SOLVED. 

¢ If a recursive call fails to find a solu- 
tion, the puzzle is restored to its pre- 
vious state (restore( ) ); the word is re- 
turned to the free list; the next 
available word is selected; and if 
none remain, the function returns 
the value FAIL to its caller. 


Let’s trace the execution of the 





“@puzzle 


——— 
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function solve( ) as it begins to solve a 
sample puzzle. The line numbers 
that follow refer to Example 5, 
below. Also, the random selection of 
the words is in the order in which 
they appear in Figure 1. 

First, a four-letter word is needed 
for the 1-across position. The func- 
tion randomly selects best (line 14), 
marks it as USED (line 16), and inserts 
it into the puzzle (line 17). A recursive 
call is then made to continue the pro- 
cessing (line 19). Next, for the 2-down 
position, a three-letter word is need- 
ed and era is similarly inserted into 
the puzzle. 

The function now moves to fill the 
4-down position. It selects the next 
available four-letter word, tamp (line 
13); checks to see that it fits (line 14); 
and inserts it also into the puzzle (line 
17). 

The next slot to fill is 5 across, and 
the program, as usual, selects the 
next available four-letter word—in 
this case tops. This time, however, 
the itfits( ) (line 15) test fails. Recog- 
nizing that the list of four-letter 
words has been exhausted (line 13), 
the function performs a backtrack 
(line 27). 

The program now resumes pro- 
cessing at the point at which it, again, 
needs to solve the 4-down position. It 
discards its current choice, tamp 
(lines 22 and 23), and selects the next 


OLVED ); 


restore( old, oe 
FLAG(len, i) = FREE 


: The function solve( ) 





available word, tops (line 14). From 
this point on, the program solves the 
puzzle without any additional 
difficulties. 


Summary 

Backtracking can be an extremely 
powerful tool for programmers, al- 
though it is always an expensive so- 
lution. Nonetheless, it can be a tool 
that enables you to solve problems 
that would be otherwise unsolvable. 


Availability 

All the source code for articles in this 
issue is available on a single disk. To 
order, send $14.95 to Dr. Dobb’s Jour- 
nal, 501 Galveston Dr., Redwood City, 
CA 94063 or call (415) 366-3600 ext. 
216. Please specify the issue number 
and format (MS-DOS, Macintosh, Kay- 
pro). If you would rather not have to 
retype the entire program and/or 
you would like some sample puzzles 
to work with, send me a check for $6 
and I will mail you an MS-DOS floppy 
(360K format) containing the pro- 
gram, source code, and several sam- 
ple puzzles. 


DDJ 
(Listing begins on page 52.) 


Vote for your favorite feature/article. 
Circle Reader Service No. 2. 
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Inventor and 

entrepreneur, 

Dick Erett, 

explains his 

company’s 

> view on the 
f intellectual 













protection 
property. 


“A 


ment companies and the 

trade press seem to be miss- 

ing or ignoring is this: 
Software protection must 
be understood to be a 
distinctively different 
concept from that com- 
monly referred to as 
copy protection. 


Fundamentally, software 
protection involves devising 
a method that prevents 
unauthorized use of a 
program, without restricting 
a legitimate user from 
making any number of 
additional copies or prevent- 
ing program operation via 
hard disk or LANs. 

Logic dictates that mag- 
netic media can no more 
protect itself from misuse 
than a padlock can lock itself. 

Software protection must 
reside outside the actual 
storage media. The technique 
can then be made as tamper 
proof as deemed necessary. 
If one is clever enough, 
patent law can be brought 
to bear on the method. 
Software protection 1s at 
a crossroads and the choices 
are clear. You can give 
product away to a segment 


crucial point that 


even sophisticated 
software develop- 





Hard Disk Installation : Simply copy program disk 
to hard disk using DOS Command - Copy Awe < 





the program diskette as you wish. 


Data Back-ups : Use normal back-up and restore 
commands, including backing up sub-directones containing 


program files. 









Program Back-ups : You may make as many copies of 


Networks : This product may be 
;. Follow the same installation 
sage 102 of this manual. The Block 
with the normal operation of any 


Soon all software installation procedures will be as straightforward as this. 


“How to protect your software 
by letting people copy it?’ 


By Dick Erett, President of Software Security 


oS 
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a 





The only difference will be whether you include the option to steal your 


product or not. 


of the market, or take a 
Stand against the theft of 
your intellectual property. 


‘“... giving your software 
away ts fine...”’ 


We strongly believe that 
giving your software away 
is fine, if you make the 
decision to do so. However, 
if the public’s sense of ethics 
is determining company 
policy, then you are no 
longer in control. 

We have patented a device 
that protects your software 
while allowing unlimited 
archival copies and unin- 
hibited use of hard disks and 
LANs. The name of this 
product is The BLOCK™ 

The BLOCK is the only 
patented method we know 
of to protect your investment. 
It answers all the complaints 
of reasonable people con- 
cerning software protection. 


In reality, the only people 
who could object are those 
who would like the option 
of stealing your company’s 
product. 


‘...eliminating the ratio- 
nale for copy-busting...”’ 


Since The BLOCK allows 
a user to make unlimited 
archival copies the rationale 
for copy-busting programs 
is eliminated. 

The BLOCK is fully pro- 
tected by federal patent law 
rather than the less effective 
copyright statutes. The law 
clearly prohibits the produc- 
tion of work-alike devices 
to replace The BLOCK. 


870 High Ridge Road Stamford. Connecticut 





The BLOCK attaches to 
any communications port of 
virtually any microcomputer. 
It comes with a unique 
customer product number 
programmed into the circuit. 

The BLOCK is transpar- 
ent to any device attached to 
the port. Once it is in place 
users are essentially unaware 
of its presence. The BLOCK 
may be daisy-chained to 
provide security for more 
than one software package. 

Each software developer 
devises their own procedure 
for accessing The BLOCK 
to confirm a legitimate user. 
If it is not present, then the 
program can take appro- 
priate action. 


‘*.. possibilities... 
limited only by your 
imagination...”’ 


The elegance of The 
BLOCK lies in its simplicity. 
Once you understand the 
principle of The BLOCK, 
hundreds of possibilities will 
manifest themselves, limited 
only by your imagination. 

Your efforts, investments 
and intellectual property 
belong to you, and you have 
an obligation to protect 
them. Let us help you safe- 
guard what’s rightfully yours. 
Call today for our brochure, 
or a demo unit.” 


inc. 
06905 


203 329 8870 


CIRCLE 170 ON READER SERVICE CARD 








USING THE WRONG LANGUAGE CAN BE MURDER. 
SPEAK SMALLTALK/V 


Let’s talk languages. 
Programming languages 
like Turbo Pascal, C or Basic 
can be killers. lo many, 
they're foreign, complex, 
and generally intimidating. 
Mistakes can be deadly. 

With Smalltalk/V, 
you have an elegantly 
simple solution that puts 
the power and majesty of 
a major AI programming language on your PC or 
compatible. It makes no difference if you're an 
experienced programmer or just getting started. 
Smalltalk/V gives you an easy-to-use and flexible 
programming tool. 

This is the same language used by leading 
software companies for their new product develop- 
ment. There are sound reasons for this. Smalltalk/V 
offers a totally integrated programming environ- 
ment using the premier object-oriented language. 
You use natural language rather than complex 
programming codes. It puts Macintosh-type 
graphic features on a PC including over- 
lapping windows, bit-mapping, pop-up 
menus, and a mouse interface. More than 
mere window dressing, Smalltalk/V delivers 
fully interactive windows that are easy to 
build and quick to modify. 

But don’t just take our word on it. 
Hear what the experts have to say: 


“This is the real thing folks. A super Smalltalk like 





Highly recommended. John tverak 


Contributing Editor 


PC Magazine 


“The tutorial provides the best introduction to 
Smalltalk available: fin Miles Benet 


Al Expert Magazine 
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Expiration date: 


Name: 


| 
| 
| 
| 
| 
| 
this turns your PC into a hot workstation. Its fantastic... | street Address: 
| City/State/Zip: 
i 
| 
| 
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“Smalltalk/V is the highest performance object-oriented 
programming system avaulable for PCs.” 


Dr. Piero Scaruffi 
Chief Scientist 
Olivetti Artificial 
Intelligence Center 


Today, thousands of professionals, scientists 
and engineers are using Smalltalk/V to solve both 
simple and expert problems. Giving them a new 
dimension in computer applications for their PC. 

Put new life into your PC by calling toll free 
1-800-922-8255 and ordering Smalltalk/V today. 
Smalltalk/V by Digitalk, Inc., 9841 Airport Blvd., 


Los Angeles, CA 90045. 
$9995 


(213) 645-1082. 

Smalltalk/V comes with 10 starter applications including Prolog and each Application 
Pack adds several more. All source code is included. Supports 640 x 480 color graphics 
with color extension pack. 

Smalltalk/V requires DOS and 512K RAM on IBM PC/AT/PS or compatibles and a CGA, EGA, 


Toshiba T3100, Hercules, or AT&T 6300 graphic controller. A Microsoft or compatible mouse 
is recommended. Not copy protected. 


Turbo Pascal is a trademark of Borland Internation. IBM, IBM PC/AT/PS are trademarks of 
International Business Machines Corporation. Macintosh is a trademark of Apple Computer, Inc. 


| TO ORDER CALL 1-800-922-8255 TODAY. 


60-DAY MONEY-BACK GUARANTEE* — Smalltalk/V $99.95 
Send check, money order, or credit card pee ie aoe ere 
information to: Digitalk, Inc., 9841 Airport ere se cae 
‘st oior £xtension 
Boulevard, Los Angeles, CA 90045. Pack $49.95 
Credit Card LC VISA LC] Mastercard “Goodies” Application 
Pack $49.95 


Card number: 


SPECIAL OFFER: 
Smalltalk/V and all 

3 packs only $199.95 
Shipping and handling $5.00 
(Outside North 

America $15.00) 


California residents add 
applicable sales tax 


your refund will be immediately forwarded 
to you. 


TOTAL : 
*Unconditional 60-day money-back guaran- 
tee. Simply return to Digitalk, Inc. and 








Real programmers don't use dBASE. Or do they? 

Were finding that some very swift programmers are using it to 
write some very fast applications, 
and are completing their 
projects much more quickly. 


With dBASE used like 


But they cheat. 

They use our Clipper™ 
compiler to combine dBASE™ 
with C and assembler. 


= Nantucket. 


© Nantucket Corporation 1987 Clipper is a trademark of Nantucket Corporation; dBASE isn't. 


pseudo-code, they can then quickly create 
prototypes that actually run. 

Then, with dBASE doing the high-level database functions, 
they use our Clipper compiler to link in C or assembly language 
modules from their own bag of tricks, 

And theyre finding that they're linking in less than they 
expected because Clipper compiled code runs so fast and 
because of Clipper's built-in enhancements. 

Clipper includes easy networking that provides file and 
record locking the way it should be done. 

Fast screens that can be treated as memory variables and 
eliminate the need for direct screen writes and all that tortuous 
heap management code. 

Box commands that make 
windowing a breeze. And more. 

So if youd like to use your time 
more productively, check us out: 
Nantucket Corporation, 

12555 W. Jefferson Boulevard, 
Los Angeles, CA 90066. 

Or if you're on deadline, call 
(213) 390-7923 today. 

Clipper could get you out of 
the soup. 





In Europe: Nantucket Corporation (Europe) 2 Bluecoats Avenue, Fore Street, Hertford, Herts SG14 1PB Telephone 0992 554621. 
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ARTICLES 








What’s the DIFF? 


ile comparison programs 
have been around for a long 
time, so you might reason- 
ably ask, ‘‘Do we really need anoth- 
er?’ If your work involves only 
small changes in a program's source 
code, the answer is probably ‘No’ — 
a generic file comparison utility is 
just fine. In contrast, for those who 
write and update the documentation 
for that program, it can be an entire- 
ly different story. 

This article got its start when we 
were faced with issuing revision doc- 
uments for a large software project 
at work. The project had literally 
hundreds of associated documents 
(performance specs, interface specs, 
design specs, detailed design specs, 
design documents, development 
plans, and so on), and our customer 
requested that we mark the docu- 
ments with change bars. (Change 
bars are vertical lines, usually in the 
right-hand margins, that mark the 
sections of text that have changed 
since the last release.) The request 
made sense: change bars save read- 
ers from having to make a laborious 
line-by-line comparison of the docu- 
mentation looking for changed text. 
Still, it meant someone would have to 
make all those line-by-line compari- 
sons to mark the text. Not really anx- 
ious to mark thousands of pages of 


FF 





Don Krantz, 2845 42nd Ave. S, Minne- 










apolis, MN 55406. Don is a principal — 
computer applications engineer at | 


Honeywell’s Defense Systems Divi- 
sion. He is a coauthor of Ada: A Pro- 
grammer’s Guide with Microcom- 
puter Examples and principal author 
of 68000 Assembly Language Pro- 
gramming, both published by Addi- 
son-Wesley. 
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by Don Kraniz 


A text file 
differencer 
and 
change-bar tool 


inC 





documentation manually, I started 
looking for a good tool to change-bar 
the text automatically, or at least to 
locate the changes for me. 

I started my search by trying the 
DOS COMP command. It fired up, 
looked at the two versions of a file I 
gave it, and reported “FILE SIZES ARE 
DIFFERENT.” With that, it exited, leav- 
ing me groping around my work 
area for the hammer I use on partic- 
ularly annoying software. 

The next place I looked was the 
BeeB (the TCOG bulletin board), rea- 
soning that any system with 42 dif- 
ferent directory programs was 
bound to have at least one file com- 
parsion program that would fit my 
needs. I located a promising file, 
downloaded it, and gave it a try. It 
did a little better than COMP did, tell- 
ing me that the files differed at line 


| 64, before it too exited—still not quite 


good enough. 

So I sat down and made a list of the 
things a suitable document compari- 
son program should be capable of: 


1. The program should know about 
the concept of pages and be able to 
recognize different sizes of pages by 
line count and form feeds. 

2. It should be smart enough not to 
mark the header and footer lines just 
because the run date has changed. 








3. It should be able to cope with repa- 
gination because of insertions and 
deletions. 

4. It should be able to stay locked on 
identical text that is paginated differ- 
ently, even with intervening headers 
and footers. 

5. It should be able to deal intelligent- 
ly with differing amounts of white 
space between paragraphs because 
of conditional paging. 

6. It would be nice if you could turn 
case sensitivity on and off so that you 
could slide by corrections to trivial 
capitalization typos without drawing 
everyone's attention to them. 

7. It would also be good to be able to 
ignore the table of contents because 
nobody expects to find change bars 
there. 

8. The program should be capable of 
inserting change bars (or other 
marks) directly into an output file, 
without any manual massaging. 

9. A change summary listing would 
also be desirable. 


After looking at this long list of fea- 
tures, and at the software available, I 
decided that I’d have to write the 
program myself. The rest of this arti- 
cle, as you must have guessed, de- 
scribes the program I came up 
with—DIFF. 

Listing One, page 66 contains the 
program listing for DIFF. The source 
code provided has been tested on 
several large and small programs 
and documents under both MS-DOS 
and VAX/VMS, Version 4.3. It compiles 
without change under both Micro- 
soft C, Version 4.00, and VAX-11 C be- 
cause the VAX C compiler defines the 
macro VAX11C automatically, and I 
use this to key the differences be- 
tween the two environments. 
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AR. your ae picca ts applications are 
_ written in Assembler, BASIC, C, COBOL, eae or 
_any of the data base languages... 
AND... you have simply | run out of time... 

or programmers... or money... 


- THEN... you owe it to yourself and to those who boos on LOE , 
professional skills — to make the easy move to CLARION... 


ELSE... you'll miss out on the CLARION se 


To order CLARION or to get our 


| free 16-page brochure and the 
Sample Program diskette, simply | : 


a7 . | call TOLL FREE... : 


ae BARRINGTON SYSTEMS, INC. 


: CLARION j is ped at $395 plus Sone It runs on 7 : S 
any IBM PC, XT, AT or true oe with 320KB of 
memory and a hard disk drive. | 

















| 750 EAST SAMPLE ROAD POMPANO BEACH, FLORIDA 33064-3597 oe 


CLARION is a registered trademark of Barrington Systems, Inc.  ——“(‘i 1986 Barrington | 
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WHAT'S THE DIFF? 
(continued from page 30) 





Commands and Options 
In its simplest invocation, DIFF takes 
two files as arguments. The first file 
is considered the “baseline,” or origi- 
nal version of a document, and the 
second file is the ‘‘revision,’’ or new 
version of the document (I am using 
document for both program source 
files and formatted documents). 
DIFF’s command line takes the fol- 
lowing form: 


DIFF [option option}] newfile oldfile 
(barfile] 


where newfile is the name of the 
new release version of the document 
or source code. It must be a unique 
file name (that is, it cannot have wild- 
card characters), and it can include a 
path name. Oldfile is the name of the 
baseline version of the document or 
source code. It is subject to the same 
rules as newfile is. Barfile is optional, 
and if supplied, it indicates that you 
want an output file with change 
bars. The output file is a copy of new- 
file with change bars on new or mod- 
ified lines. If barfile is not specified, 
no change-bar output will be creat- 
ed, but you'll still get the change 
summary output. 

Some example command lines are: 


DIFF FILE1.DOC FILE1.BAK 
DIFF /BLANKS /LOOKAHEAD=20 FILE- 
1.DOC FILE1.BAK 
DIFF /BLANKS FILE1.DOC FILE1.BAK 
FILE1.PRN 


Options take the form of VAX/VMS 
options, which are similar to MS-DOS 
command-line switches. An option 
begins with a slash (/), followed by a 
series of characters. If the option re- 
quires a numeric parameter (for ex- 
ample, the number of lines in a 
page), the series of characters is fol- 
lowed by an equal sign (=) and a 
number, without spaces. 


Spaces between options are op- 
tional, and placement of the options 
on the command line is optional. Up- 
percase/lowercase in an option is 
not significant. Typical options look 


like this: 


/BLANKS 
/LOOKAHEAD= 200 
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In addition, options can be abbrevi- 
ated, as long as enough characters 
are used to make the option name 
unique. For instance, the previous 
examples could be abbreviated in the 
following ways: 


/BL /B /BLA /BLAN ... 
/LO= 200 /LOOK= 200... 


Unrecognized options cause the 
program to print an error message 


BAR_COL 


and then halt. The entire command 
line is parsed before the program ex- 
its if errors occur. 

DIFF options along with the syntax 
and default value of each option are 
listed in Table 1, below. DIFF error 
messages along with the cause of the 
error are listed in Table 2, page 34. 


Output 
DIFF has two forms of output—one 
standard and one optional. The 





Selects the column in which the change bar will be placed. The default is column 78. If col- 
umn 0 is selected, the change bar will be placed at the left edge of the document or source 
code, moving text to the right if necessary. If a space or a tab is the first character on the 
line, the alignment of the text should not be affected. If a nonzero column is selected, the 
change bar will be placed in the specified column if possible. If text extends over the speci- 
fied column, the change bar will be moved as far to the right as is necessary not to over- 


write text. 


A ‘‘feature’’ of the change-bar algorithm is that it can recognize and account for under- 
lined text, at least the way Runoff and WordStar underline for ‘‘generic’”’ printers, but not 
tabs. Tabs are counted as one column each. This produces amusing results on C source 


code. 


For best results, on document files choose a column to the right of your text. On pro- 
gram source code with embedded tabs, choose column 0. This is admittedly an area in 
which the program could be improved. | needed the underline capability, and if the tab ex- 
pansion is added, the code in change—bar/ ) gets uglier than it already is. 


Example: BAR_COL=0. 


/TOP_SKIP 





Used for processing formatted documents. Its primary reason for being is to allow you to 
skip over the header line(s) in a document. Header lines confuse DIFF if they are left in 
place because DIFF doesn’t know from chopped liver about headers unless you tell it, and 
if the pagination changes between the old and the new files, DIFF will cheerfully change- 
bar every header. Be sure to account for blank lines at the top of the page that precede 
the header line(s). The default value of /TOP_SKIP is 0. 


Example: /TOP_SKIP=3. 


/BOT_SKIP 





Similar in use and purpose to the /TOP_SkK/P option. It specifies how many lines at the bot- 
tom of the page should be skipped. Count lines up from the bottom, not down from the 


top. The default value of /BOT_SKIP is 0. 
Example: /BOT_SKIP=8. 


/PAGE_LEN 





Sets the length of a page in lines. The default value is 66 lines. A form-feed character will 
override the /PAGE_LEN value and cause a new page to be started. DIFF needs to know 
the page length in order to skip headers and footers if /TOP_SKIP and /BOT_SKIP are 
specified. Also, the change summary lists changes by page and line number. For nonpa- 
ginated text, such as program source code, you should specify a value of /PAGE_LEN 
greater than the number of lines in newfile so that the change summary line numbers will 


correspond to file line numbers. 
Example: /PAGE_LEN=2000. 


UP_CASE, /NOUP_CASE 


Controls whether or not the case of alphabetic characters is significant when deciding if a 
line has changed. The default is /VOUP_CASE, which means that the case of a letter is sig- 


nificant. This is slightly faster than /UP_CASE. 


Examples: /UP_CASE and /NOUP_CASE. 


Table 1: Options 










(continued on page 33) 
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Microsoft. C 


Optimizing Campiler 


ter char **all Add Watch... Ctrl 
ter CTL *ctli® : 


short filj yay mt of files on 
ctl->debug rt out with no © 


/* now go find flags and files on cmd line */ 
while (--argc) 

{ : 
/* Pirst uppercase the arg to simplify parsin: 

upper GH+argu)) . 
/* check command line for flags */ = 


if (argy == ’-’) 
“i 


7* interpret flags if found */ 
switch (Ger+*argy) 











Fast Execution Speed. 


Microsoft® C 4.0 Micr 
Sieve (25 iterations) D./ 
11.0 
19.9 
22.8 
14.2 
- New optimizations generate the fastest code: 
— Inline code generation. NEW! 
— Loop optimizations: NEW! 
— Loop invariant expression removal. NEW! 
— Automatic register allocation of variables. NEW! 
—Ehmination of common sub expressions. 
—Improved constant folding and value propagation. 
-Fine tune your programs for even greater speed: 
— Coding techniques for writing the fastest possible 
programs are included in the documentation. NEW! 
—Segment Allocation Control: 
—Group functions into the same segment to get faster 
NEAR calls. NEW! 
— Specify which segments receive variables to yield 
faster NEAR references. NEW! 
— Uses register variable declarations. 
— Mix memory models using NEAR, FAR &6 HUGE 
pointers. 


Benchmarks run on an IBM* Personal System/2™ *Time is negligible. 








Fast Compilation. 
Fast Prototyping. 


Microsoft C Version 5.0 includes QuickC* which 

lets you edit, compile, debug, and execute in an 

integrated environment. It’s ideal for prototyping. 

«In-memory compilation at over 10,000 lines/ 
minute. NEW! 


¢ Built-in editor with parentheses, bracket and 
brace matching. 

¢ Use the integrated debugger to animate through 
your program, add watch variables and set 
dynamic breakpoints. NEW! 

MAKE file is automatically generated for you. 
Simply indicate the modules you want to use, 
then MAKE recompiles and links only those 
modules that have changed. NEW! 

«Full C 5.0 compatibility: 

—Completely source and object code compatible. 
— Emits CodeView*-supported executables. 
—Identical compile/link command line switches. 





And speed. 


Fast Debugging. 


Microsoft C Version 5.0 includes Microsoft CodeView, 
our source-level windowing debugger that lets you debug 
more quickly and thoroughly than ever before. 

¢ Debug larger programs: 

— Debug through overlays created by the 
Microsoft overlay linker. NEW! 

—Expanded Memory Specification (EMS) 
support. NEW! 

Fast debugging through precise control of your 
program execution: 

— Access source level and symbolic debug information 
from your Microsoft C, FORTRAN, and Macro 
Assembler programs. NEW! 

— View your source code and assembly simultaneously. 

— Watch the value of variables change as you execute. 

—Set conditional breakpoints. 

— Animate or single step through your program. 

CodeView brings you as close as you've ever been 

to your hardware: 

— Swap between your code and output screens. 

— Watch your registers and flags change as your 
program executes. 


= 1 0 
C 5.0 will be available soon. If you purchase Microsoft C 4.0 after June 1, 1987, 
we ll give you a C 5.0 upgrade. Free. For your free information packet, call: 


(SOO) 426-9400. 


Microsoft, the Microsoft logo and CodeView are registered trademarks and QuickC is a trademark of Microsoft Corporation. 
IBM is a registered trademark and Personal System/2 is a trademark of International Business Machines Corporation. 
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standard output is a summary list 
showing deletions from the baseline 
and additions to the revision. Option- 
ally, it can create an additional third 
file that is a copy of the revision file 
with change bars on lines that have 
changed or been added. No notation 
is added to the created file to indicate 
the lines in the baseline file that don’t 
appear in the revision file. 


+ pp:ll --> text 

or: 

-pp:ll --> text 

Lines that are in newfile but not old- 
file are preceded by a plus sign (+) 


(for ‘‘added’’—get it?). Lines that are 
in oldfile but not newfile are preced- 


The summary output has this | ed by a minus sign (-) (for ‘taken 
form: away ). 
/RE_SYNC 


Controls how many lines must match between the two files after a difference has been 

found before the two files are considered to be back in sync. The default is five lines. Us- 

ing a larger number will make DIFF smarter when considering files that have a lot of identi- 

Cal lines (Such as BEGIN or END statements in Pascal). Using a smaller number will make 

DIFF smarter when considering a file that has a lot of small changes spaced closely to- 

gether. For text, a value of 2 or 3 is good. For source code, a value of 5 is pretty good. 
Example: /RE_SYNC=2. 


/OUTPUT 
Allows you to specify an output file for the change summary listing. In MS-DOS, this is ex- 
actly equivalent to redirecting standard output with the greater-than command-line option, 
and you can use either way in MS-DOS. In VMS, this matches the VMS standard redirection 
syntax. The default for OUTPUT is SYS$OUTPUT on VMS and the console on MS-DOS, but 
this can be redirected as a command option. 

Example: /OUTPUT=FILE1.SUM. 


/BLANKS, /NOBLANKS 
Lets you make blank lines (for my purposes, a blank line contains only spaces or tabs) ei- 
ther significant or insignificant. /VOBLANKS is the default and means that blank lines are 
not considered to be significant. This is the most useful as it accounts for conditional pag- 
ing and trivial source code prettying. 

Examples: /BLANKS and /NOBLANKS. 


/LOOKAHEAD 
Controls how far DIFF will look forward in both files to find a rematch after it finds a differ- 
ence. The default is 200 lines. A larger value lets you process files in which several pages 
are added or deleted between revisions. A smaller value runs much faster and uses less 
memory. Resynchronization time (in the general case) is proportional to the square of / 
LOOKAHEAD. This value also affects the amount of memory the program uses. 

Example: /LOOKAHEAD= 50. 


/SKIP1 
Allows you to specify a number of pages to skip in the two files before starting the com- 
pare. This is most useful when skipping tables of contents, in which the page numbers 
may change but nobody cares. The default for /SK/P7 is 0 pages. The /SK/P1 option sets 
the page-skip values for both newfile and oldfile. 

Example: /SK/IP1 =3. 


/SKIP2 
Same as /SK/P7, except that it only affects the page-skip value for o/dfile. Because /SKIP1 
affects both files, the /SK/P2 option must appear to the right of /SK/P7 on the command line 
to have any effect. The two options are provided because the tables of contents may be 
of different lengths. There are probably other reasons why /SK/P2 needs to be here, but | 
can’t think of any right now. 

Example: /SK/P2=4. 


/TRACE 
Conditionally compiled and turns on function tracing (see the main text for more on debug- 
ging options). 


Table 1: Continued 
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The rest of the summary output 
is the same for added or deleted 
lines. The pp:ll portion of the output 
is the page number followed by the 
line number where the difference 
occurs. Added lines show page/line 
in newfile. Deleted lines show page/ 
line in oldfile. Text is the text of the 
changed line. For example, if one 
word in one line is changed between 
the baseline and the new release, 
two summary outputs will be 
shown—the new line from newfile 
and the old line from oldfile. This 
feature makes it convenient to com- 
pare the differences without having 
to hunt for change bars. Each group 
of differences is separated by a 
blank line in the change summary 
output. 


Operation 

The program's basic operation is 
pretty simple. It compares the two 
files line by line until it finds a differ- 
ence. When this happens, it drops a 
marker in both files at the point of 
difference and scans ahead through 
both files to find where the text 
matches again. 

When the files are resynced, the 
text between the point of difference 
and the resync point in both files is 
change-barred and output to the dif- 
ference summary. The basic re- 
synchronization algorithm takes 
only about 80 lines of code. The rest 
of the program is accounted for by a 
command-line parser and option 
handlers. 

The major data structure used is 
struct LINE. This structure is allocated 
dynamically and contains a line 
from one of the input files in both 
original and uppercase form, the line 
and page from which the line was 
taken, and a link pointer used to 
string lines together. As the files are 
searched for resync, the text from 
the two files is chained into a linked 
list for each file. If blanks and head- 
ers/footers are being excluded, they 
are also held in the linked list while 
the program compares the next sig- 
nificant lines. 
reason I never get them right the first 
time. There’s just something about 
me and linked lists that causes me to 
leave subtle bugs in the code I write. 
By now, all the bugs are (hopefully) 
out of this code, and the code for han- 
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WHAT'S THE DIFF? 
(continued from page 33) 


dling the linked lists is about half its 
initial size. Exorcising the problems 
with linked lists is the reason for the 
trace, ret, and ret_val macros. If the 
debugging tools are compiled in, the 
program can display function entries 
and exits and the call stack on de- 
mand. (The demand call stack dis- 
play only works under MS-DOS.) 


A Functional Description 
The function main( ) processes the 
command line, opens the files, and 
checks for command-line errors. If 
no errors are found, it runs the dif- 
ference check. 

Function dont—look( ) decides if a 
line is significant or not. If a null 
pointer is given to it, it returns FALSE, 


| DIFF. coe Maggs to 
name are correct é 
_ gotten slash (/) on ar 


Error: Can't create <fi 

DIFF was unable to cre 
legal one and that yo 
placed. Could be - 


ERROR in option <opti 
This error occurs when a 


ERROR creating <na 
This error occurs when DIFF is | 


indicating that the line is significant. 
(This lets you factor some end-of-file 
logic out of later loops.) If the line 
comes from the header or footer 
area, or if the line doesn’t contain 
printing characters and the /BLANKS 
option was used, it returns TRUE; oth- 
erwise, it returns FALSE. 

Function equal( ) decides if two 
lines are identical. If the /UP_CASE 
option was used, the uppercased 
lines are compared; otherwise, the 
original lines are compared. Equal( ) 
returns TRUE if the lines are identi- 
cal. On a small-memory system, this 
function could be modified to per- 
form the uppercase conversion each 
time instead of carrying an upper- 
cased copy in struct LINE, which 
would enable you to specify /LOOK- 
AHEAD values that were about 80 
percent larger than if you left the 


e for the directory in ) , 


T option has a malformed or missing file name. 


r ble to create an output file for the change summary. Be 


_ Sure that the name is a legal one and that you have write privilege for the directoryin © 


_ which the name is to be placed. 


_ Unrecognized Option: < option> 
An option name is misspelled or illegal. 


on the command line. 


Table 2: Error messages 
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program unchanged. 

Function position( ) is used to posi- 
tion the linked-list pointer to a given 
line in the linked list. This is used 
when resyncing files after a differ- 
ence is found. 

Function fix( ) is included for the 
VAX/VMS version. The VAX C version 
of fgets( ) returns a carriage return/ 
line feed pair at the end of a line, 
which caused me problems detect- 
ing an end of line when inserting the 
change bar. The carriage return 
alone can’t be used because of em- 
bedded carriage returns in lines that 
have underlined portions. Fix( ) con- 
verts the end of line to a single line 
feed (new line)—but only on the VAX. 

Function index( ) searches a string 
for a specified character. I wrote this 
because of nonstandard standard li- 
brary names for this function in the 
different compilers I use. 

Function next_line( ) reads a line 
from one of the input files and links 
it into the linked list of lines in that 
file. Space for struct LINE is allocated 
dynamically. It slows operation, but 
a conditionally compiled switch lets 
you look for form feeds within a line 
if your text might contain a form 
feed in any character position other 
than the first in a line. Next_line( ) 
also keeps track of page and line 
numbers for the file. If the program 
has “looked ahead” at the file from 
which the next line is requested, 
next_line( ) will return a pointer to 
the memory copy rather than read- 
ing a line from disk. 

Function discard( ) deallocates 
lines (allocated by next_line( )) that 
are no longer needed. 

Function vfputs( ) outputs lines toa 
data file. In MS-DOS, it is simply a call 
to fputs( ). In VAX/VMS, it replaces the 
line terminator with a carriage re- 
turn/line feed pair. 

Function put( ) writes matching 
lines from the input file to the 
change-bar output file. 

Function change—bar( ) inserts a 
change bar into its input string. Two 
different algorithms are used, de- 
pending on whether the change bar 
is to appear to the left or the right of 
the text. 

Function added( ) handles lines 
that appear in the revision file but 
not in the baseline file. They are out- 
put to the change summary and, if 
enabled, to the change-bar file. 
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The most up-to-date training in the 
UNIX’System, from the people who 


keep the UNIX System up-to-date 








thorough, 
productive. 


Classes 
What could make forming now 
more sense than UNIX \@ Reserve as 
System training from the %@ quickly as possi- 
people who invented the ble for preferred 
UNIX System—the people dates at our com- 
responsible for all its updates pletely equipped 


and revisions. AT&T. 

Created to train AT&I's own 
professionals, our curriculum is 
the most comprehensive avail- 
able—including C language as 
well as the UNIX System. And 
every course is practical and 
job-related. 

Training for everyone 

L] Systems developers 

L] Applications programmers 

L_] Technical specialists 

[_] System managers and users 
Whatever your specialty, AT&T 
has the right curriculum, from 
basic overviews to programming 








Individual attention 
Classes are limited in size, so that 
each student can be given individ- 
ual instruction and supervision. 

In laboratory classes, each stu- 
dent is assigned his own terminal. 
Instruction is by AT&T UNIX System 
veterans and is personal, 


training centers in Atlanta, Chi- 
cago, Dublin, OH, Los Angeles, 
Princeton, NJ, and Sunnyvale, CA. 
Or well arrange instruction on 
your site at your convenience. But 
dont wait—call or write now 

for information and seat 


reservations. © 1987 AT&T 


Free fact-packed training catalog: 
Call 1800 247-1212, ext. 1002, or mail this coupon. 


g= Registrar, AT&T Training, DDJ 8/87 “| 
i | PO. Box 45038, Jacksonville, FL 32232-997 
Please rush me your course catalog with information on: 
L] UNIX System training LJ UNIX System video training 
L] Data communications and networking training 


- Name 





to business applications and data J 
‘ : f Company 
communications. And every ey 
. . ress 
course is kept up-to-the-minute _ | | 
: City State Zip 
with such recent advances as ae 


System V Release 3.0. 
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The right choice. 


WHAT'S THE DIFF? 
(continued from page 34) 


Function deleted( ) handles lines 
that appear in the baseline file but 
not in the revision file. They are out- 
put to the change summary. 

Function resync( ) is the guts of the 
program—it resynchronizes the two 
files after they get out of sync. The 
input arguments are pointers to the 
lines that are found to differ in the 
two files. It works in the following 
manner. 

The first line in the revision file 
that doesn’t match the baseline file is 
compared to lines in the baseline file 







Add C++ to 
your favorite 
C Compiler 


° Object-oriented C 


e Strong type-checking 


¢ Works with your 
present C Compiler 






BENEFITS: 


> Works with the C Compiler you 


now use 


m You can incrementally add C++ 
features to C (switch-selectable) 


& Makes C more suitable for 


— very large programs 
— more sophisticated applications 


> More reusable code 
> Resilient and bug-free code 


until a matching line is found or you 
have looked at /LOOKAHEAD signifi- 
cant lines, whichever comes first. If 
you find a matching line in the base- 
line file, you compare the next /RE 
_SYNC lines to ensure that they too 
match. If so, you consider yourself 
synced, print the change informa- 
tion, and exit with the file input 
pointers at the first lines that match 
again. If /RE_SYNC lines don’t match, 
you continue the search. 

If you look at /LOOKAHEAD lines in 
the baseline file without matching 
the revision file from the point of dif- 
ference, you move ahead one line in 
the revision file and then repeat. 


DESIGNER C++ | 


FEATURES: 

e Fully compatible with 
AT&T C++ standard 

¢ Optional strong type 
checking 

e Data abstraction 

¢ Overloading of func- 
tion names and 
operators 

e Dynamic typing (virtual 
functions) 

e User-defined implicit 
type conversion 

e Works with Sun’s 
abxtool 


The only commercially-available C++ customized 


to operate on PC's, micros, minis, and main- 
frames with popular C compilers, including: 


VAX C SUN C 
ULTRIX C MICROSOFT 
APOLLO LATTICE’ 
XENIX GREEN HILLS 
HP-9000 UNISOFT 


We Specialize in: Cross/Native Com- 
pilers: C, Pascal, FORTRAN, Ada, LISP — 
Assemblers/Linkers — Symbolic Debug- 
gers — Simulators — Interpreters — Pro- 
filers — QA Tools — Design Tools — Comm. 
Tools. — OS Kernels — Editors — VAX & PC 
Attached Processors and more 

We Support: 680xx. 80x86, 320xx. 68xx, 
80xx: Clipper, and dozens more 


“Lattice and Microsoft versions of Designer C++ are known as 


Advantage C ++ 


A DIVISION OF XEL 7 +, 7 


ee a er oh eee Ph Te Oe I I TE ee aS Ee 
60 Aberdeen Ave., Cambridge, MA 02138 (617) 491-4180 == 


Ps, 
ao 








A 


1219 Morningside Drive, Manhattan Beach, CA 90266 (213) 546-5814 (CA only) 


Designer C++ 1s a joint trademark of XEL. Inc and Glockenspiel. Ltd of Dublin. Ada is a trademark of the US Government (AJPO). Advan- 
tage C++ 1s a trademark of Lifeboat Associates. Inc Other trademarks are acknowledged to DEC. Lattice. Microsoft & Sun Microsystems. Inc 
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Eventually, you'll either find a 
match or you'll have moved ahead 
/LOOKAHEAD lines in the revision 
file. At this point, you give up and 
exit from the program. 

This is a fairly brute-force method 
as a file that contains one or two 
large difference sections and a large 
number of small differences will 
perform poorly because /LOOK- 
AHEAD needs to be large enough to 
accommodate the big differences but 
will be inefficient on the small differ- 
ences. It should be relatively easy to 
make this adaptive by starting witha 
small value for /LOOKAHEAD, and 
when a large difference is encoun- 
tered, at label no_sy pushing the old 
value of /LOOKAHEAD, setting a larg- 
er value (say, double the old value), 
and calling resync( ) recursively. 
This way, given enough memory, 
the program will always resynch- 
ronize. 

Function diff! ) handles the print- 
ing of lines that match and calls re- 
sync( ) when differences are found. 

Function page—skip( ) skips the 
front ends of files when the /SKIP op- 
tions are used. 

Function help( ) prints the usage 
summary when command-line er- 
rors are detected. 

Function open—files( ) opens the 
two input files and, if specified, the 
change-bar output file. 

Function redirect( ) redirects the 
VAX standard output. Because this 
program has a variable number of. 
arguments, it’s easiest to use if in- 
stalled as a foreign command, and 
the standard redirection doesn't 
work then. Incidentally, to install 
this, use the following command: 


DIFF := = $ diskname:[pathname] 
DIFF.EXE 


Redirect( ) works under MS-DOS as 
well, but it’s not required. 

Function strip—_opt( ) parses the 
command line. It is designed around 
the VMS command syntax, which I 
like better than MS-DOS or Unix (at 
least for options). I get annoyed 
when I can't abbreviate options I use 
interactively or leave them spelled- 
out in command scripts. I also get an- 
noyed when options are case sensi- 
tive, especially if some of the options 
are lowercase, some are uppercase, 
and some are mixed (as in a certain C 
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Get more pluses with 

new ADVANTAGE C+ +. 

Expand your programming capa- 

bilities with C++, the object-ori- 

ented language ADVANTAGE 

from AT&T that C ™ 

gives you all the ++ 

benefits of C without its limitations. 

Our enhanced ADVANTAGE C+ + 

is the only full C++ implementa- 

tion available. 

¢ Develop large and complex pro- 
grams with greater resilience, 
fewer bugs. 

¢ Fully compatible with your exist- 
ing C programs and libraries. 

¢ Code is more reliable and main- 
tainable. 

¢ Fully tested and documented. 

¢ Small to large memory models. 

¢ Microsoft Windows compatible. 

¢ Available for Microsoft and Lattice 
C compilers: MS-DOS and XENIX 
operating systems. 


Now your programs can do 
more than one task at once. 


TimeSlicer is a linkable library of 
C functions to create multitasking 
and real-time TimeSlicer 
programs at the 
application level rather than inter- 
facing with the operating system. 

¢ Highly efficient — 10,000 context 


switches/second; 80 micro seconds 
interrupt latency. 

¢ Unlimited number of tasks can be 
run concurrently. 

° Create, suspend or terminate tasks 
at run-time. 

* Supports large and small memory 
models; preemptive and non-pre- 
emptive modes; waking-up of 
tasks to optimize special event 
processing; and interrupt service 
routines written in C. 

¢ Extensive intertask communica- 
tion capability. | 

¢ Compatible with Lattice C, Micro- 
soft C, ADVANTAGE C+ + and as- 
sembly language. 


Design advanced graphics 
for today’s applications. 


ADVANTAGE Graphics gives you 
the expanded graphics capabilities 


and functionality ADVANTAGE 


required for to- ies 
day’s sophisti- Graphics 


cated programming needs. 

¢ Easily create multi-window and 
other object-oriented applications. 

¢ Realistic, typeset-style graphics. 

¢ Access all levels of the graphics 
system. 

¢ Full and complete clipping of all 
graphic elements and text. 

¢ Predefined and user-defined line 
styles, fill patterns and cursors. 





What Pascal did for his dad, 
we can do for you. 


In 1644, 19-year-old Frenchman Blaise Pascal devised 
one of the first mechanical calculators to help his 
father with time-consuming tax computations. 
Called the Pascaline, it was the size of a shoe box and 
used numbered dials to process numbers up to 
999,999,999. Pascal’s idea represents what Lifeboat 
is all about: Developing tools that enable you to do 
your job faster and better than ever—and help you 


make your own mark on history. | jEEDNAT 
Sod 
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¢ Create and instantly switch be- 
tween multiple on- or off-screen 
graphic windows. 

¢ Supports global, local and virtual 
coordinate reference frames. 


ADVANTAGE 386 C™ and ADVANTAGE 
386 Pascal™ —Two compilers generating 
32-bit protected-mode code for the 80386 
under MS-DOS. 

ADVANTAGE Disassembler™ — Lets 
you disassemble object code into source 
code and make changes to fit your needs. 
ADVANTAGE Make™ — The best-docu- 
mented MAKE utility available; feature- 
packed MS-PC/DOS version of UNIX 
MAKE facility. 

PANEL Plus — A powerful, interactive 
tool that makes screen design as easy as 
writing with a word processor. 


QuickScreen™ — A full-featured, time- 
saving screen design program that re- 
quires no written code. 


RUN/C Professional — Powerful C inter- 
preter featuring loadable libraries and 
advanced debugging. Now with Micro- 
soft 4.0 compatibility. 


Call 1-800-847-7078 
In NY: 914-332-1875 


or see your local 
Lifeboat Affiliated Dealer 
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INTERNATIONAL SALES OFFICES 
Australia/New Zealand: 

MOS Computer Software/ 

Charlton Distributors 

Auckland (09) 766-361 

Canada: Scantel Systems 

Toronto (416) 449-9252 

Denmark: Ravenholm 

Copenhagen 288-7249 


England: Grey Matter, Ltd. 
Devon 364-53499 

System Science, Ltd. 

London (01) 248-0962 

France: Compusol 

Paris 14 530 0737 

Italy: Lifeboat Associates Italia 
Milan 02-464601 


55 South Broadway, Tarrytown, NY 10591, Telex #510-601-7602 


Japan: Lifeboat, Inc. 
Tokyo 03-293-4711 
SATT Software 
Tokyo 03-295-3390 


Spain: Micronet, S.A. 
Madrid 1-262-3304 
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Netherlands: SCOS Automation BV 
Amsterdam 020-10 69 22 


Switzerland: Euro-Link 
Willisau 4145 813 514 
West Germany: 

MEMA Computer GmbH 
Frankfurt 069-347226 
Omnitex 

Rheinfelden 07623/61820 








On April 2,1987 


IBM and Quarterdeck 





announced the next generation 


in personal computing. 


Introducing DESQview 2.0. I mproving the 
past and ready for the future right now. 





n one sweeping announcement from 
Miami Beach and New York City, 

IBM established new standards of 
performance for personal computers, 
with its new Personal System/2.™ 
Quarterdeck was there with IBM and 
simultaneously helped establish new 
standards for multi-tasking and multi- 
windowing. 

We were there for them then. We’re 
here for you now. 

If you use two or more software 
programs, if you use a PC- compatible 
machine, if you own a new 80386 
computer, if you’ve just bought one of 
the new Personal System/2 computers, 
or if you've tried Microsoft Windows 
and were disappointed but still need the 
power of graphics programs, DESQview 
2.0 is the answer. 

Consider this. InfoWorld voted 
DESQview’s earlier version 1986 Prod- 
uct of the Year. SoftSector gave it the 
Editor’s Choice Award. In PC Tech 
Journal's “System Builder Contest” at 
Comdex Fall it was voted best operating 
environment. And 450,000 dedicated 
users on four continents have voted yes 
with their dollars. 

The new DESQview 2.0 is an order of 
magnitude better. 

This unique software program 
enhances the power of your personal 
computer and makes it more convenient 
to use. It still gives your PC the power 


of many PCs. It still does windows. 
It still multi-tasks. It still breaks the 
DOS 640K barrier. It still transfers data. 
It still dials your phone. It still gives 
you menus for DOS. It still remembers 
your keystrokes (macros). It still runs 
your existing programs and your new 
programs soon to come. In fact now 
you can even run Windows-, GEM-, and 
Topview-specific programs too. And 
with 386 machines and our Expanded 
Memory Manager it still becomes a 
386 control program, but now you can 
run text and CGA graphics programs 
in background. 

The new DESQview 2.0. 

For us it’s the next logical step. 
For you it’s windows of opportunity. 


Rush me DESQview 2.0! Today! 






SYSTEM REQUIREMENTS 

¢ IBM Personal Computer and 100% 
compatibles (with 8086, 8088, 80286 or 80386 
processors) with monochrome or color 
display; IBM Personal Systemm/2 » Memory: 
640K recommended; for DESQview itself 
0-145K * Expanded Memory (Optional): 
expanded memory boards compatible with 
the Intel AboveBoard; enhanced expanded 
memory boards compatible with the AST 
RAMpage ° Disk: Two diskette drives or one 
diskette drive and a hard disk * Graphics Card 
(Optional): Hercules, IBM Color/Graphics 
(CGA), IBM Enhanced Graphics (EGA), 

IBM Personal System/2 Advanced Graphics 
(VGA) * Mouse (Optional): Mouse Systems, 
Microsoft and compatibles * Modem for 
Auto-Dialer (Optional): Hayes or Compatible 
* Operating System: PC-DOS 2.0-3.3; MS-DOS 
2.0—3.2 * Software: Most PC-DOS and MS-DOS 
application programs; programs specific to 
TopView 1.1, GEM 1.1 and Microsoft Windows 
1.03 * Media: DESQview 2.0 is available on 
either 5%” or 3%" floppy diskettes 
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DESQview 2.0 
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Shipping & Handling USA $ 5.00 
Outside USA | $ 10.00 
| sale (CA residents) [052 [3] | 
ee 
Payment: []Visa LJMC [L]AMEX []Check Enclosed 
| Credit Card: Valid Since _____ /__SSSSs Expiration —___ 
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Shipping Address 
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Mail to: Quarterdeck Office Systems, 150 Pico Boulevard, Santa Monica, CA 90405 
NOTE: If you own DESQview call us for a special upgrade offer, or send in your DESQview 


registration card and we'll send you upgrade information. 
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WHAT'S THE DIFF? 
(continued from page 36) 





compiler made by a company 
known for PC operating systems and 
mice). But then, we software types 
are known for our unreasonable 
likes and dislikes—I still use Word- 
Star—and this parser can easily be 
made more Unix-like by changing 
the OPT_FLAG define and the literal 
arguments to match( ). 

Function upper( ) converts its 
string argument to all uppercase 
letters. 

Function match( ) checks for (possi- 
ble) partial matches of command-line 
option strings with a pattern string. 
To make this really bulletproof, it 
ought to check for a minimum num- 
ber of matching characters. Right 
now it doesn’t, but this hasn’t caused 
any trouble so far. 

Function num( ) retrieves the value 
parameter from command options. 

The rest of the program is condi- 
tionally compiled and is strictly de- 
bugging support for making modifi- 
cations. Whenever I find occasion to 
tweak the program, it seems to die 
silently the first couple of times I run 
it. With the debugging support in, if 
you run the program with the 
/TRACE option, it will print a mes- 
sage each time it enters or exits a 
function. Pressing T toggles tracing 
on and off. Pressing S displays the 
current call stack. This is a great help 
in finding where the program is 
hung in a loop. Be warned: it’s also 
hours of fun to watch DIFF crunch a 
200-page document with /TRACE on. 


Areas for Enhancement 
Because DIFF has solved my immedi- 
ate change-bar concerns, it’s unlikely 
I'll be making any major enhance- 
ments in the future. I am releasing 
DIFF into the public domain, howev- 
er, and would appreciate hearing 
from those of you who make modifi- 
cations and improvements to the 
program. And I have two suggestions 
to start you off. 

The first major enhancement I can 
see would be useful in archiving ver- 
sions of source code. DIFF could be 
modified to emit line editor script 
files that contain the commands to 
transform one version of a file into 
another. This would let you keep 
only the first version of a file in its 
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complete form. Subsequent versions 
would be kept as differences (the edi- 
tor script file), so any version could 
be recreated by transforming the 
original into the desired version with 
a series of editing operations. Many 
configuration management/source 
code control tools use this type of sys- 
tem to save disk space. 

The second major enhancement is 
more difficult and possibly is useful 
only to a small number of people. 
The current version of DIFF is line- 
oriented, and thus it can be fooled by 
any changes in format—for exam- 
ple, reparagraphing a document 
with different margin settings, add- 
ing several words for a paragraph 
(and thus the paragraph to be refor- 
matted), and common alterations to 
source files such as tabbing/detab- 
bing or pretty-printing. 

It’s rare that reformatting effects 
are major problems, but if they be- 
come a concern, DIFF could be modi- 
fied to act on tokens rather than on 
lines. The major headache in token- 
izing is that the lexical rules are dif- 
ferent for program source and docu- 
ments. A less serious problem is 
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relating the change information 
from the token stream back to the 
line-oriented source text. Compilers 
seem to be able to do this, so several 
elegant solutions probably exist. 
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~ MANY CLAIM IT. 
FEW PRODUCE IT. 


That's why many professional C programmers choose Computer 
Innovations’ C86 PLUS C compiler and the ROMpac Development 
Tool to create stand alone ROM applications. 


FAST EXECUTING PROGRAMS 


C86PLUS supplies the power to make your programs run 
faster because it is based on a proprietary compiler design 
technology that applies artificial intelligence to produce 
highly optimized code. 


C8 

BENCHMARKS jee. Microsoft C Lattice C 
(seconds) v.1.07 v.4.0 v.3.1 
sieve.c (Compact mod.) 

Eratosthenes 21 29 30 
rsieve.c (large mod.) 

(registers) 14 17 Zo 
loop.c (medium mod.) 

(loop optimization) 1 28 45 
randio.c (small mod.) 

(random access I/O) 10 va 24 
tlong.c (small mod.) 

(long integer math) 128 155 198 


tdbl.c (small mod.) 
(floating point math) 38 a7 47 
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ROMpac is a high-level software development package 
designed to assist C programmers who need to compile C 
programs and burn the executable program into ROM. 
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in dedicated machines. Typical uses include: data 
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process control systems. The common factor is that one 
program is in complete control of the CPU. There is no 
limit on the size of the program, other than physical 
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512K; Hard Disk required. 


ORDER NOW: 

C86PLUS w/ROMpac Development Tool ...... $699 
COOPHIS-C ‘COMpPHe! <0 2x chekewe nukes dees $497 
ROMpac Development Tool ................ $250 


800-922-0169 


Purchase C86PLUS w/ROMpac and receive one-year 
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ARTICLES 





Optimizing 
Compilers for C 


You’ve seen the ads: Datalight chal- 
lenges Microsoft. Our C compiler ex- 
pert Richard Relph saw the ads and 
sent for Datalight’s compiler. What he 
found when he began to test it must 
have given him mixed feelings. For the 
past two years Richard has been in- 
volved in developing the DDJ suite of 
benchmarks for C compilers. The Da- 
talight compiler flattened those bench- 
marks, making them worthless. What 
has made our benchmarks obsolete 
and raised the stakes for C compiler 
vendors is something called global op- 
timization, common on mainframe 
and minicomputers and now coming 
to the desktop. Because it was Rich- 
ard’s work that was made obsolete, 
we gave him the assignment of report- 
ing on the optimization techniques that 


did the job.—eds. 
‘ke optimizations that a C 
compiler can perform to 
make the resultant code either small- 
er or faster. For many languages, 
such as FORTRAN, optimization is 
necessary because the language is 
poorly matched to the target proces- 
sor. But C’s close match to underlying 
target instructions and its rich set of 
operators have made optimization 
largely optional for C code. A well- 
written C program, compiled with a 
nonoptimizing compiler, can per- 
form favorably compared to the 
same program written in FORTRAN 
or Pascal. 


his article describes some of 





Richard Relph, 846 Salt Lake Dr., San 
Jose, CA 95133. Richard is a software 
and hardware consultant. He has writ- 


ten compilers and embedded 
systems. 
a2 








by Richard Relph 


Function range 
optimization 
is the biggest 
step forward. 


Nevertheless, C code can be opti- 
mized, for some applications it may 
be highly desirable for the compiler 
to do the optimization, and optimiz- 
ing C compilers have existed for 
some time for non-Intel processors. 
Tartan Labs and Green Hills come to 
mind when thinking about optimiz- 
ing C compilers for VAXs or 680x0s. 

With the apparent glut of C com- 
piler suppliers vying for the MS-DOS 
market, it was only a matter of time 
before one of them decided to step 
above the crowd and provide a reli- 
able optimizing C compiler. Datalight 
beat all others to the punch by deliv- 
ering such a compiler in February of 
this year. Computer Innovations has 
also shown a product that it claims is 
optimizing, and others will an- 
nounce and deliver products before 
the year’s end. 

Datalight provided me with its Op- 
timum-C package in February, and it 
is this compiler upon which this arti- 
cle is largely based. 


Varieties of Optimizations 

I have used the term optimization 
rather freely, but so do compiler ven- 
dors. There are, in fact, several kinds 
of optimizations, and I would like to 
distinguish what I mean by optimiza- 
tion from what other people (partic- 
ularly compiler vendors) might 





mean. 

Basically, optimization can occur 
at two places in the compilation pro- 
cess. The simplest, so-called peep- 
hole, optimizations occur in the final 
stages. A peephole optimizer can 
eliminate various dumb-looking in- 
struction sequences. It can get rid of 
redundant loads (loading a register 
with a value that it already contains) 
and some jumps around jumps (de- 
pending on the target instruction set 
and the knowledge the compiler 
maintains about function size). Some 
peephole optimizers do more ad- 
vanced things. 

The other place in the compilation 
process in which optimizations can 
occur is in the middle stages. This is 
after the program has been “‘read”’ 
by the compiler and converted to 
some intermediate form. In many 
compilers this intermediate form is 
both host and target independent, 
thereby making optimizations at this 
stage very useful if the compiler 
must support multiple targets. 

These intermediate optimizations, 
which are more interesting for my 
present purposes, can occur over 
five ranges, which I refer to here as 
statement, block, function, module, 
and program. These range designa- 
tions are pretty self-explanatory. A 
statement is a statement. A block is a 
sequence of instructions in which 
there are no jumps or labels used as 
entry points. A function is a function. 
A module is a module or source file. 
Optimizations over all these ranges 
can be performed using current 
compilation models—edit, compile, 
link, and debug. Optimizations over 
the last range—program—cannot. In 
this case the compile and link phases 
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must be combined. 

Optimization from _ peephole 
through statement range is nothing 
new. These optimizations have been 
done for a long time by almost all the 
C compilers Iam familiar with (that’s 
a lot). Some examples of statement 
range optimization are constant fold- 
ing, strength reduction, and dead 
statement elimination. These are ba- 
sic, and I will not discuss them here. 

Block range optimization is where 
the subject begins to get interesting. 
Block range optimizations are done 
by some of today’s better PC-based 
compilers. The most common and 
important block range optimization 
is common subexpression elimina- 
tion, and you can see it in practice 
later in this article. 

But it is function range optimiza- 
tion (sometimes called ‘global opti- 
mization’) that represents the big- 
gest step forward in C code 
optimization today. Function range 
optimization is really what this arti- 
cle is about, so I'll defer examples 
and descriptions for a few lines 
while I dismiss module and program 
range optimization. 

Module range optimization is rare. 
The only commercial compilers I 
know of that do this are those from 
Tartan Labs. An optimizer dealing 
with the module range turns some 
small functions into in-line code or 
automatically passes arguments to 
static functions in registers. This is 
called “‘interprocedure analysis.”’ In 
fact, all the simpler kinds of optimi- 
zations can be performed across sev- 
eral functions, and when this is done, 
it is module range optimization. As I 
say, though, this is rare. 

The last range for optimization is 
program range optimization. This 
takes you beyond rare and to nonex- 
istent. When some compiler (and 
built-in linker) implements program 
range optimization, you can begin to 
say things such as “‘this is optimal” or 
‘‘as good as the best assembly lan- 
guage’ because all the information 
about the program is available to the 
compiler at one time. This is still a 
dream, but some companies are dis- 
cussing this kind of compiler. If you 
want to be prepared, get a machine 
with lots of memory, a superfast pro- 
cessor, and, perhaps most important, 
an uninterruptible power supply, 
because this compiler’s compilation 
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time will be measured in hours to 
weeks instead of seconds to hours. 

Table 1, below, summarizes the 
availability of these different optimi- 
zations in present-day compilers. 
The optimization ranges are not as 
firm as they appear to be from the 
preceding outline. Compiler vendors 
may choose to implement only one 
or two of the simpler function range 
optimizations—not the full deck. 
Companies currently doing this are 
Wizard/Borland and MetaWare, 
which implement the simplest auto- 
matic register allocation scheme, and 
MetaWare and Microsoft, which im- 
plement cross-jump optimizations. 
Many compiler vendors implement 
some sort of switch statement opti- 
mizer, which is hard to categorize (I 
believe it is a block range optimiza- 
tion). But none of the vendors, until 
Datalight, has attempted a reason- 
ably complete function range 
optimizer. 


Modern Optimization 
Techniques 

The rest of this article provides a tour 
of the major function range optimi- 
zations. I give each a name (note that 
I did not say ‘‘the’’ name), a brief de- 
scription of the optimization, and a 
sample code fragment to which the 
optimization applies. I'll start with 
some of the more basic and simpler 
optimizations and work toward the 
more advanced. 


Constant Propagation 

Constant propagation is used when a 
variable has a constant value over a 
portion of the function. Although 
constant propagation is not very use- 
ful by itself, in conjunction with 
common subexpression elimination 
and invariant code motion (discussed 
later), it becomes important. 


Stage 

final 
intermediate 
intermediate 


Range 


statement 
block 


intermediate function 


Rarity 
common 
common 
some PC 
compilers 
new to PC 


For the next several optimizations, 
I will refer to the following simple 
code segment: 


func( p ) 
int p; 
{ 


int 1; 
int J; 


i=5; 
for (jj = 0;j <i;j++) 


which, after constant propagation, 
becomes: 


funcl p ) 
int p; 


int 1 
int j; 


i= 5; 
for j = 0;j <5;j++) 


) 


} 


As this example shows, constant 
propagation may create dead assign- 
ments. The assignment i = 5 be- 
comes pointless unless i is used off- 
stage somewhere. 


Copy Propagation 

Copy propagation is like constant 
propagation, except that the compil- 
er keeps track of which variables 
hold the same values rather than not- 
ing that a certain variable holds a 
constant value. This results in substi- 
tution of one variable for another 
when they have the same value. The 
possible advantage this gives you is 
that one of the variables may be fast- 
er to get to (because it is in a register) 
than the other. 


Example 

“peephole’’ optimization 
dead statement elimination 
common subexpression 


elimination 
code hoisting 


compilers 


module 
program 


intermediate 
intermediate 





rare 
nonexistent 


interprocedure analysis 





Table 1: Use of various optimizations in present-day compilers 
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OPTIMIZING C COMPILERS 
(continued from page 43) 


In the preceding example, if i were 
assigned the value x instead of the 
constant 5, then copy propagation 
would apply and you would see the 
following: 


i= x; 
for j = 0;j< x;jt+7) 


) 


As is the case with constant propaga- 
tion, copy propagation may create 
some dead assignments; here, if 1 is 
not used subsequently, the assign- 
ment i = x is dead. 


a 


Dead Assignment 
Elimination 

Dead assignments are assignments to 
variables that are not used before the 
variables are assigned again. In the 
constant propagation example, after 
the constant has been propagated, 
the assignment to if is useless, or 
dead. Such an assignment can be 
eliminated. After dead assignment 


elimination in the example you 
have: 


funcl p ) 
int p; 
{ 
int 1; 
int J; 


, librarian, object cod 
and full library source code. 


fer and cross reference ulili 


The Cutting Edge 


He ONTARIO Canada L6L2J5 
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fiz o"} 
for (j = 0;} < 5;j++) 


Dead assignment elimination may in 
turn result in a dead variable, as has 
happened in this example. Variable i 
is now dead and can be eliminated, 
which leads me to the next subject. 


Dead Variable Elimination 

A dead variable is a variable that is 
never referenced. Looking again at 
the constant propagation example, 
after constant propagation and dead 
assignment elimination, the variable 
i may no longer be needed, so its 
space on the stack or in a register can 
be freed for other use. 

Eliminating it, you get: 


J* it 1 *7 
int j; 
oe a 


for (j = 0;j <5;j++) 


} 


The variable p is also dead, but being 
an argument to the function, it is not 
removable. 


Dead Code Elimination 

As you can eliminate dead assign- 
ments and dead variables, so too can 
you eliminate dead code. Dead code 
is any code that can never be 
reached. Although dead code is rare 
in practice, this optimization is fairly 
easy to do, so why not? Many compil- 
ers implement simple forms of this 
optimization.even though they do 


struct x { 
int.2* 


ehar cc; 
}d[ 10 ][ 10], s[ 10][ 10]; 
copy() 


inti, J+ 
for (i=0;i(10; i++) 
for (j=0;j(10; 
a ieaer a 
diijJ{jl= 
sfil([jl; 


Example 1: C code to be optimized 


Dr. Dobb’s Journal, August 1987 


not implement other function range 
optimizations. For the remaining op- 
timizations, we will use the code seg- 
ment in Example 1, page 44. 


Global Common 
Subexpression Elimination 
Many functions use and reuse sub- 
expressions in the computation of 
complete expressions. Such sub- 
expressions are said to be common. If 
a compiler can detect such sub- 
expressions, compute them once, 
save the result, and simply refer to 
the saved result, recomputation can 
be avoided. This is particularly im- 
portant with floating-point and other 
compute-intensive data types. Note 
that the compiler may create a vari- 
able in the process. 

The following shows the code in 
Example 1 after common subexpres- 
sion elimination. 


10 = 1" 
d[0][{ to] = 


10-7] 
s [0] [ tO J; 


Lifetime Analysis 

Lifetime analysis is the first of the 
hard optimizations. What lifetime 
analysis attempts to do is determine 
which variables have meaningful 
values over what range of the func- 
tion. 

Variables that have nonoverlap- 
ping ranges may share processor re- 
sources, especially registers. For 
straight code it is easy to see how to 
do this analysis, but loops and gotos 
make it much harder. 


Register Allocation 

After the lifetime of each variable is 
determined, important variables can 
be identified. Important variables 
are those that are referred to often, 
either because they are named fre- 
quently or because they occur inside 
loops. There is usually a multiplier 
applied to the “reference count” ob- 
tained for variables in loops. So, once 
the compiler has ranked the vari- 
ables in importance, its goal is to use 
the processor’s resources well. A 
well-known technique for doing this 
(used by Datalight) is called ‘“‘color- 
ing’ because of its similarity to the 
map-coloring problem—except your 
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“map is a variable usage graph. 

The map-coloring problem is this: 
Given a fixed number of colors (CPU 
registers), color the map (the variable 


usage graph) so that the fewest (préf-~ 


erably 0).number-of states (variab 
are left uncolored (not in registers) as- 
suming that no two adjoining states 
(variables with overlapping life- 
times) have the same_ color 
(register). 

A much simpler allocation strategy 
is used in some existing compilers. 
These compilers merely take the 
most important variables and dedi- 
cate them to registers throughout the 
function. 


iiorr oe 








Loop Invariant Code Motion 

Similar to common subexpression 
elimination, loop invariant code mo- 
tion (sometimes called ‘code hoist- 
ng“) notices that some subexpres- 


Sions...are._not...affected..by the 


execution of the loop. Because most 
loops are executed more than once, 
such subexpressions are logically 
common (refer to the definition un- 
der common subexpression elimina- 
tion). By computing them once be- 
fore the loop is entered, the compiler 
can save a lot of run-time 
recomputations. 

After one level of code motion, our 
example looks like this: 


Whats 
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OPTIMIZING C COMPILERS 
(continued from page 45) 


tO = 1* 10; 
for (j = 0; j < 10; j++) 
{ 
t1 = tO + j; 
d [0]{t1] = s[0][t1]; 


Loop Induction 
What loop induction is, conceptual- 


“Dick Johnson 
in accounting 





What loop induction is, conceptual- 
ly, is strength reduction on loops. If 
a loop has a subexpression in 
which one part is loop index sensi- 
tive and the operator is multiply, it 
is possible to replace the subexpres- 
sion by a variable that gets added to 
for each change in the loop index. 
The remaining examples point out 
the usefulness of this technique 
(particularly when such constructs 
may be present but not obvious) 
and give some further sense of how 
function range optimizations can 
be used. 

ous dead eliminations, we have: 





is havingea 
heart attack!” 


Would you know what to do? 
Would anyone in your company be 


able to help? 


One of your employees is stricken. 
Breathing and heartbeat have stopped. 
Does anyone know what to do until help 


arrives? 


The American Red Cross can 
train your employees in CPR—Cardio- 
pulmonary Resuscitation, a first aid 
method that sustains life. 

Ir’s just one of the ways the 
Red Cross helps you keep your company 


healthy and safe. 


Contract your local Red Cross 
Chapter and ask about CPR training. 
That way, when disaster strikes, you can 
all breathe a little easier. 
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Rio American Red Cross 


for (tO = 0; t0 < 100; tO += 10) 
for (j = 0; j <:10; j++) 
{ 
t1 = 10 + j; 
d(0)(t1] = s[0}[(t1 J; 


This code can be optimized fur- 
ther, though. Here it is after loop in- 
duction on [1: 


for (t1 = tO; t1 < tO + 10; t1+ +) 
d (0)( t1 ] = s[0}[t1 }; 


Here it is after common subexpres- 
sion elimination on the implied mul- 
tiply in the loop: 


for (t1 = tO; t1 < tO + 10; t1+ +) 
{ 
t2 = t1* sizeof( struct x ); 
(char *)&d) + t2 = ((char 
*)&s) + t2; 


—— 


The following code fragment shows 
what the effect of reinduction on t1 
and t2 will be: 


for (t1 = tO * sizeof( struct x ); 
ti < (tO + 10) * sizeof( struct 
x); 
t1 + = sizeof( struct x )) 


(char *)&d) + tl = 
((char *)&s) + t1; 


Here it is after more invariant code 
motion: 


t3 = (tO + 10) * sizeof( struct x ); 
for (t1 = tO * sizeof( struct x ); 

tl =13; 

t1 + = sizeof( struct x )) 


The machinations I have just been 
through can be expected to yield 
space and time benefits in the neigh- 
borhood of 30 percent. Datalight has 
improved its dhrystone perform- 
ance from 1,084 to 1,284 dhrystones 
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per second through these kinds of 
optimizations. 


Summary 
Although the discussion in this arti- 
cle has been based largely on work 
with one optimizing compiler, more 
optimizing compilers will be coming 
out soon. One problem they will pre- 
sent to software developers has to do 
with naming. There is no agreed- 
upon name for many of these optimi- 
zation techniques. Just because some 
vendor says it has “xyz” optimization 
doesn’t mean nobody else does; it 
may just mean that nobody else calls 
it xyz. I hope this article has provided 
you with some means to understand 
vendors’ claims and counterclaims 
and to make an informed choice. 
Ialso hope I have given you a sense 
of the importance of this develop- 
ment in personal computer compiler 
technology. The optimizations I have 
discussed here are considered basic 
by minicomputer and mainframe 
compiler standards, and it is precise- 
ly because of the lack of such “‘basic 
tools” that many computer profes- 
sionals consider personal computers 
to be toys. Well, these particular ba- 
sic tools have arrived. I think we can 
now safely put the “toy” complaint 
to rest, and I firmly believe that, 
when program range optimizers ar- 
rive, personal computers will be 
among the first machines of any size 
to employ them. 


DDJ 
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Worried about productivity, performance or quality? 
Find peace of mind... 


C Programmer's Toolbox 
Volumes I & II 


23 powerful tools for the IBM PC, AT and compatibles, developed by 
professionals with many years of experience in system and application 
software development. For both beginning and experienced programmers. 

- Monitor program/system execution 

- Beautify program listings 

- Determine program flow/critical paths 

- Trace and verify variable usage 

- Filter input/output streams 

- Create/modify/verify file contents 


o Powerful, common user interface 
o Interactive and batch execution 
o Online documentation 

Oo aa aca error — 


MMC AD Systems 
Box 360845 Milpitas, California 95035 
(408) 263-0781 


rsion 3.2 of Lattice 
iIS5-DOS C Compiler features: 


¢ Full support for Microsoft Windows, 
including far, near and Pascal key words. 


¢ Ability to generate more than 64K of static 
data and declare objects larger than 64K. 


e * Improved support for ROM-based applica- 
at 1Cce tions via the “const” data type. 
¢ Full implementation of K&R C with UNIX 
and ANSI extensions including void, enum, 


unsigned, structure arguments and structure assignment. 
¢ Offers the widest selection of C support tools. 


¢ Over 300 library functions providing ANSI/UNIX/XENIX 
compatibility as well as supporting unique MS-DOS capabilities. 


¢ Full service and technical support from Lifeboat. 


Lattice is a registered trademark of Lattice, Incorporated. 


1-800-847-7078 [EKERAAT 


In NY: 914-332-1875 Beil fale’ oO 


55 South Broadway, Tarrytown, NY 10591 _—s The Full-Service Source for Programming Software 


To order or obtain a complete 
technical specification sheet call: 
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The Leaders Made PVCS ase 
The Leading Source Code Control System 


hen it comes to maintaining their most 

valuable asset, the leading software 
publishers rely on the POLYTRON Version Con- 
trol System (PVCS). From accounting firms to 
airlines, the leading service companies depend 
on PVCS to maintain the integrity of their pro- 
grams. Leading manufacturing companies use 
PVCS to maintain their state-of-the-art software. 
Leading high technology companies turn to 
PVCS to handle configuration management for 
software projects that represent an investment 
of hundreds of thousands of dollars. The largest 
aerospace companies and defense contractors 
use PVCS to maintain integrity of projects during 
development and after delivery of software. 
Independent programmers use PVCS to 
improve their productivity and software quality 
for themselves and their clients. 


Simplify 
Configuration Management 


When large and complex software programs are 
being developed on personal computers or VAX 
minicomputers, effective management of the 
revisions and versions becomes critical. PVCS 
simplifies this process and lets you effectively 
control the proliferation of code changes. We 
used UNIX SCCS and RCS as models. How- 
ever, our own experience, and the input of 
hundreds of programmers and managers has 
enabled us to significantly improve upon these 
models. 


PVCS provides many 
powerful functions including: 
e Storage & Retrieval of multiple revisions of text. 
e Maintenance of acomplete history of changes. 


e Maintenance of separate lines of development 
using branching. 


e Merging simultaneous changes. 
e Resolution of Access Conflicts. 


e Modules can be retrieved by their own revision 
number, system version name, or specified 
date. 


e Uses “reverse deltas” to rebuild a prior version 
making PVCS the fastest version control 
system over the project life cycle. 


e Projects already under developmentor in the 
maintenance stage can be easily put under the 
control of PVCS. 


Manages Development On 
Local Area Networks 


Programming teams using Local Area Networks 
depend on PVCS to help the managers and 
team members work together. In fact, Novell and 
3Com themselves depend on PVCS to manage 
the versions of their own network software 
products. 


Supports MS-DOS 
and VAX/VMS Development 


Now, companies that develop software on VAX 
systems running VMS can also use PVCS. And 
since the VMS and MS-DOS versions of PVCS 
use the same “logfile” format, you can easily 
develop software on PCs and maintain the code 
on the VAX or vice versa. The menu-driven, 
screen-oriented interface (and optional 
command-driven interface) makes it easy for 
programmers and librarians or administrators to 
use PVCS on a PC or VAX or both systems. 


PVCS Maintains System 
Integrity 


PVCS prevents corruption of code that could 
ordinarily result from security breaks, user care- 
lessness or malfunctions. The levels of security 
can be tailored to meet the needs of your project. 


PVCS & PolyMake 
Work Together 


PolyMake, the leading MS-DOS make utility, is 
now available for the VMS operating system. 
This allows you to write makefiles that will func- 
tion in both PC and VAX environments. Addition- 
ally, PolyMake reads time & date stamps of PVCS 
archives for fast, accurate program rebuilding. 


PVCS and PolyMake Maintain 
Source Code Written In 
Any Language. 


Only PVCS meets the needs of independent 
programmers and corporations. Once you stan- 
dardize on PVCS, the archives used to track and 
monitor changes are interchangeable between 
any PVCS product. You will receive full credit for 
your initial purchase if you upgrade to a higher- 
priced MS-DOS version of PVCS. 


Personal PVCS — Offers most of the power and 
flexibility of Corporate PVCS, but excludes the 
features necessary for multiple-programmer 
projects. 


Corporate PVCS — Offers additional features to 
maintain source code of very large and complex 
projects that may involve multiple programmers. 
Includes multi-level branching to effectively main- 
tain code when programs evolve on multiple 
paths (e.g. new versions for different host 
systems, or anew program based on an existing 
program). 


Network PVCS — Extends Corporate PVCS for 
use on Networks. File locking and security levels 
can be tailored for each project. 


PVCS for VAX systems — Requires VMS. Uses 
the same interface and archive format as MS- 
DOS version. Supports branching and offers file 
locking and other security features for multiple- 
programmer projects. 






The Preferred 
Version Control System 


The customers listed below are just a few of the 
innovative leaders that have made PVCS the 
leading version control program for personal 


computers. 


Alcoa Aluminum 

Arthur Anderson 

AT&T 

Ashton-Tate 

Bank of America 

Bell Labs 

Bendix 

Boeing 

CIGNA 

Citibank 

3Com 

Colonial Penn 
Commerce Clearing House 
Control Data Corp. 
Corvus 

CX! 

Digital Equipment Corp. 
Deloitte Haskins + Sells 
Diebold 

Dow 

Dunn & Bradstreet 

EDS 

Educational Testing Service 
E-Systems 

Equitable Life 

Federal Express 

First Boston 

Ford 

Fox Software 

Fujitsu 

GTE 

Hardees 
Hewlett-Packard 
Honeywell 

Hughes Aircraft 

IBM 

Industrial Networking 
Intel 


| MS-DOS" | 
VAX Tix 


Personal PVCS $149 


ISC Aerospace 

VAC 

Javelin 

Lattice 

Lawrence Livermore 
Lotus 

McData Corp. 
McDonnell Douglas 
Mead Data Central 
MIT Lincoln Labs 
Nastec 

Novell 

NCR Technologies 
Pitney Bowes 
Plexus Computers 
Price Waterhouse 
ROLM 

Rockwell International 
Safeco 

Sears 

Security Pacific 
Sperry 

Software Publishing 
Spacelabs 
Standard Oil 
Standard & Poors 
Tandem 

Tektronix 

Telex 

Texas Instruments 
Touche Ross 

Unisys 

United Airlines 
United Parcel Service 
United Technologies 
U.S. West 
Westinghouse Electronics 
Xerox 


VAX 8xxx 


Network PVCS | $995** | $4950 | $9,500 /|$10,500+ 
Network $447°* | $1,250 | $2,375 | $2500+ 
PolyMake 


*Compatible with MS-DOS 2.0 through 3.3. 
Compatible with the IBM PC/XTI/AT & other 





MS-DOS PCs. 


**5 Station LAN License. Call for pricing 


on larger Networks. 


TO ORDER: 
VISA/MC 1-800-547-4000. 
Dept. No. 355. 

Oregon & Outside USA call (503) 645-1150. 
Send Checks, PO.s to: POLYTRON 
Corporation, 1815 NW 169th Place, 

Suite 2110, Beaverton, OR 97006. 


LY TRON 


High Quality Software Since 1982 
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SAS Institute Inc. 





Announces 


Lattice C Compilers for Your IBM Mainframe 


Two years ago... 

SAS Institute launched an effort to develop a 
subset of the SAS® Software System for the 
IBM Personal Computer. After careful study, 
we agreed that C was the programming 
language of choice. And that the 

Lattice® C compiler offered the quality, 
speed, and efficiency we needed. 


One year ago... 

Development had progressed so well that we 
expanded our efforts to include the entire 
SAS System on a PC, written in C. And to 
insure that the language, syntax, and 
commands would be identical across all 
operating systems, we decided that all future 
versions of the SAS System —regardless of 
hardware—would be derived from the same 
source code written in C. That meant that 
we needed a C compiler for IBM 370 main- 
frames. And it had to be good, since all our 
software products would depend on it. 

So we approached Lattice, Inc. and asked 
if we could implement a version of the 
Lattice C compiler for IBM mainframes. 
With Lattice, Inc.’s agreement, development 
began and progressed rapidly. 


Today... 
Our efforts are complete—we have a first- 
rate IBM 370 C compiler. And we are 
pleased to offer this development tool to 
you. Now you can write in a single 
language that is source code compatible with 
your IBM mainframe and your IBM PC. We 
have faithfully implemented not only the 
language, but also the supporting library and 
environment. 

Features of the Lattice C compiler for 
the 370 include: 


@ Generation of reentrant object code. 
Reentrancy allows many users to share 
the same code. Reentrancy is not an 
easy feature to achieve on the 370, 
especially if you use non-constant 
external variables, but we did it. 

@ Optimization of the generated code. We 
know the 370 instruction set and the 
various 370 operating environments. We 
have over 100 staff years of assembler 
language systems experience on our 
development team. 

@ Generated code executable in both 
24-bit and 31-bit addressing modes. You 
can run compiled programs above the 
16 megabyte line in MVS/XA. 

@ Generated code identical for OS and 
CMS operating systems. You can move 
modules between MVS and CMS 
without even recompiling. 

@ Complete libraries. We have 
implemented all the library routines 
described by Kernighan and Ritchie (the 
informal C standard), and all the library 


routines supported by Lattice (except 
operating system dependent routines), 
plus extensions for dealing with 370 
operating environments directly. 
Especially significant is our 
byte-addressable Unix®-style I/O 
access method. 

@ Built-in functions. Many of the 
traditional string handling functions are 
available as built-in functions, generating 
in-line machine code rather than function 
calls. Your call to move a string can result 
in just one MVC instruction rather than a 
function call and a loop. 


In addition to mainframe software 
development, you can also use our new 
cross-compiler to develop PC software on 
your IBM mainframe. With our cross- 
compiler, you can compile Lattice C 
programs on your mainframe and generate 
object code ready to download to your PC. 

With the cross-compiler, we also offer 
PLINK86™ and PLIB86™ by Phoenix 
Software Associates Ltd. The Phoenix link- 
editor and library management facility can 
bind several compiled programs on the 
mainframe and download immediately 
executable modules to your PC. 


Tomorrow... 

We believe that the C language offers the 
SAS System the path to true portability and 
maintainability. And we believe that other 
companies will make similar strategic 
decisions about C. Already, C is taught in 
most college computer science curriculums, 
and is replacing older languages in many. 
And almost every computer introduced to 
the market now has a C compiler. 


| want to learn more about: 


| 1) the C compiler for MVS software developers 
| (1) the C compiler for CMS software developers 
O the cross-compiler with PLINK86 and PLIB86 


today...so I’ll be ready for tomorrow. 


Please complete or attach your business card. 


| 

| Name 

| Title 

Company 
Address 

| City 

Telephone 


| Mail to: SAS Institute Inc., Attn: CC, SAS Circle, Box 8000, Cary, NC, USA. 
DDJ 8/87 


27511-8000. Telephone (919) 467-8000, x 7000 














C, the language of 
choice... 


C supports structured programming with 
superior control features for conditionals, 
iteration, and case selection. C is good for 
data structures, with its elegant implemen- 
tation of structures and pointers. C is 
conducive to portable coding. It is simple 
to adjust for the size differences of data 
elements on different machines. 


Continuous support... 

At SAS Institute, we support all our 
products. You license them annually; we 
support them continuously. You get updates 
at no additional charge. We have a 
continuing commitment to make our 
compiler better and better. We have the 
ultimate incentive—all our software 
products depend on it. 


For more information... 
Complete and mail the coupon today. 
Because we've got the development tool for 
your tomorrow. 


® 


SAS Institute Inc. 

SAS Circle, Box 8000 

Cary, NC 27511-8000 

Telephone (919) 467-8000 x 7000 


State __——C—“CséiZ*XCZT PP 
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SAS is the registered trademark of SAS Institute Inc., Cary, NC, USA. Lattice is the registered trademark of Lattice, Inc. PLINK86 and PLIB86 are trademarks of Phoenix Software Associates Ltd. 
UNIX is the trademark of AT&T. Copyright © 1985 by SAS Institute Inc. Printed in the USA. 
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AND STATISTICAL 
SYSTEM 


for IBM PC/XT/AT’s 
Vato Mm Oxedailey-) ale) (=) 


written by Lee E. Edlefsen 
and Samuel D. Jones 


Save Thousands 
in Mainframe 


. 
i ee 
Miglig corseega th aan 
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te 


a 
-—— Extremely 
ak Fast 
Easy to Learn and Easy to Use! 


Powerfull 


The New Standard for Scientific 


“I used to use FORTRAN and PASCAL for languages, 
TSP and Minitab for statistics, MATLAB for math, and 
NAG and IMSL for FORTRAN subroutines. Now I just 
use GAUSS.” 


Dr. Choon-Geol Moon 
Stanford University 


@ STATISTICS (means, frequencies, crosstabs, regression, non- 
parametrics, general max liklinood, non-linear least squares, 
simultaneous equations, logit, probit, loglinear models, & more) 


© GRAPHICS (publication quality 2D & 3D: color, hidden line 
removal, zoom, pan; up to 4096 x 3120 resolution; produce 
Tektronix format files; output fo most screen drivers, plotters, 
printers) 

@ PLUS: 


¢ DATABASE MANAGEMENT 
¢ SIMULATION ¢ TIME SERIES/SIGNAL PROCESSING 
* LINEAR PROGRAMMING 
¢ NON-LINEAR OPTIMIZATION 
e NON-LINEAR EQUATION SOLUTION 
¢ INTERACTIVE MATRIX PROGRAMMING 
¢ LARGE-SCALE MODULAR PROGRAMMING 
¢ ADD YOUR OWN COMMANDS 
e LINK FORTRAN, C, ASSEMBLER SUBROUTINES 


| Buy the GAUSS Programming 
of the GAUSS Mathematical 
includes 2D & 3D graphi 
programs written in the GAUSS P: 
a variety of mathematical, statistic 

| source code is provided with these f 


Call or Write: 
P.O, Box 6487 


APTECH | Kent, WA 98064 
SYSTEMS, INC. | (206) 631-6679 


30-DAY MONEY BACK GUARANTEE 
The GAUSS Mathematical 
and Statistical System 
The GAUSS Programming 
Language (alone) 
Shipping/ handling 
GAUSS requires an IBM PC/AT or compatible, 320K (512K required 
for high resolution graphics) DOS 2.10+, and a math coprocessor). 


NOT COPY PROTECTED 
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~ BACKTRACKING 


Listing One (Text begins on page 24.) 


1: /* 
2: * 
3: KROSS <C 
4; * 
os: | COPYRIGHT (C) 1987 by Charles F. Bowman 
G: * 
7 «6 ALL RIGHTS RESERVED. 
8: * 
9: */ 
10: #include "stdio.h" 
ple 
12: #define NIL "\000' 
a3: 
14: #define ALL 1 
15: #tdefine PUZ 2 
16: #define DOWN Zz 
17: #define ACROSS 2 
13s 
13: #define MINWORD 3 
20: #define MAXPUZ 25 
21: #define MAXWORD 50 
22: #define WORDLEN 15 
237 
24: #define EMPTY 0 
25: #define FREE 1 
26: #define USED 2 
27: #define SOLVED 3 
20% 
29: #define BLANK ~ 
30: #define PADCHAR '‘'-' 
31: #define WORDS "@words" 
32: #define PUZZLE "@puzzle" 
33 
34: #define FLAG(x, y) list{ x - MINWORD ].w[ y ].flg 
35: #define WORD(x, y) list{ x - MINWORD J.w[{ y ].word 
36: 
37: FILE *fp; 
382 int length, width; 
39: char puzzle[{ MAXPUZ ][ MAXPUZ j; 
40: 
41: struct words { 
42: char word[ WORDLEN ]; 
43: int flg; 
44: }; 
45; 
46: struct { 
47: struct words w{ MAXWORD J; 
48: } list[ WORDLEN - MINWORD ]j; 
49: 
50: main( ac, av ) 
22% int ac; 
52? char Savi); 
532 { 
54.2 
55% 1f( ac != 2 ){ 
56* fprintf( stderr, "usage: kross puzzlefile\n" ); 
oe exit( 1 ); 
58: } 
395 if( (fp = fopen( av{1]), "xr" )) == NULL ) { 
60: fprintf( stderr, "Cannot open'%s' to read!\n", av(1)); 
61l< exit( 2 ); 
62: } 
63: 
64: readpuz( fp ); 
65: if( solve(0, -1) ){ 
66: pprint( PUZ ); 
67: } else { 
68: printf( "No Solution!!\n" ); 
69: } 
70: exit( 0 ); 
ti: 3 
2: 
73: /* 
74: * a eueeianenienennianhennnieeenimmeienimsebemenbemmtmmmtannisntarmtmetetmtemiemeeteet tata emeteeteee ee 
. READPUZ(): read puzzle into memory from file 


(continued on page 52) 
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Easy toC 


is a great programming 
language. Now the C 
WORKSHOP makes it easy. 
Whether you’re new to pro- 
gramming or a dBase pro. 

An interactive tutorial, 
quizzes and program 
exercises teach youC. = ,— 
When you complete and \L 
run an exercise, the 
amazing Soft Tutor™ 
gives you immediate feed- 
back, pinpointing incorrect 
results or assuring you that the program 
is correct. That’s right, use any approach 
you like and get instant feedback! 

If you’ve never programmed before, 
start with the basic ideas of structured 
programming. You get extra care with C 
pointers, structures, and side effects. 
Study what you want when you want, 





SPECIFICATIONS 


Tutorial: Instruction, quizzes, and program exercises. Electronic index, table of con- 
tents, and five bookmarks. Sequential and random paging. 

Editor: Search and replace (forward, backward, use/ignore case, auto-repeat), block 
commands (move, copy, delete, delete all except block), split screen (two independent 
files, each up to 64K), program text or word processing, customizable editing keys 
(default: WordStar and cursor keys), context-sensitive help (edit keys, C key words, sym- 
bols and library functions), auto-indent. Creates ASCII text files. 

Compiler: Standard Kerninghan & Ritchie C including floats, longs, and bit fields. 
ANSI extensions (signed char, unsigned long, re-usable member names). Names up to 18 
significant characters. Preprocessor has macros with parameters. Produces native 8086 
code. Compiles over 5,500 lines per minute (8 MHz 80286). Your program runs in C 
Workshop or may be saved as .COM disk file. Cursor placed at first error message; 
messages reviewable in editor. 

Standard library: 44 functions including disk I/O, cursor control, printf, scanf, sbrk, 
longjmp. 

Soft Tutor: When you complete a program exercise, the Soft Tutor tells you whether 
it produces correct results or shows you an example of the problem. Checks program 
performance after compiler has checked syntax. Accepts any program that produces 

= correct results, regardless of how you coded it. 

Book: Fully coordinated with software; both produced by 
Wordcraft. 384 pages. Illustrated and indexed. 

Memory usage: Uses 220K. Uses additional RAM for larger 
edit buffers and object program space. 

If not satisfied, tell us why and return in 30 days for your 
money back. 
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Wordcrs.Ft 
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including advanced list tech- 
niques and recursion. 

The C WORKSHOP has 
everything you need to learn 
and use C. You can write your 
own programs, too. [he inte- 
grated editor and 5500 line/ 
minute compiler are complete 
with popup menus, custom- 
izable keys, online help and C 
reference lookup. 

Let the other guy struggle 

with confusing books and com- 


pilers. Join AT&T and other 


major companies now using the C 


WORKSHOP. Columnist Adam 


Green calls it “the most intriguing 
new type of training system I’ve 


ever seen.” (InfoWorld, 1/27/86) 
Order your C WORKSHOP 


today. And C how easy it is. 





PRS aaa eRe eee eey 

- Call toll-free (Visa, MC, AmEx) or write. 

i (800) 227-2400 ext. 955. 

Z Name ——— 

a Address 

: City 

E State Zip 

El C Workshop software and book 69.95 

Ll Ship (we use Priority Mail) 5.00 

E Sales tax in CA (4.90) 

- Check enclosed for $b 
Mail to: Wordcraft S 

BH 3827 Penniman Ave., Oakland, CA 94619 A 

Fe ee SAR OR LS OL 


Quality software since 1981 


CIRCLE 163 ON READER SERVICE CARD 


Dr. Dobb’s Journal, August 1987 








BACKTRACKING 


Listing One (Listing continued, text begins on page 24. ) 


Tle *f 

78: readpuz () 

aoe. 4 

80: int Dw 

81: char buf{ 85 ]; 

82: 

83: 

84: length = 0; 

85: [* 

86: * Puzzle Section 

We x / 

88: if( fgets( buf, sizeof buf, fp ) == NULL ) { 

89: fprintf( stderr, "%s: Premature EOF!\n", PUZZLE ); 
90: exit ( 4 ); 

91: } 

92: if( strnemp( buf, PUZZLE, strlen( PUZZLE ) ) ){ 

933 fprintf( stderr, "%s: BAD FORMAT!\n", PUZZLE ); 
94; exit( 5 ); 

65: } 

96: 

97: if (fgets (buf, sizeof buf, fp) ==NULL 

98: || !stxrncmp (buf, WORDS, strlen (WORDS) )) { 

99: fprintf( stderr, "%s: Premature EOF!\n", PUZZLE ); 
100; exit( 4 ); 

10i2 } 

102: width = strlen( buf ) - 1; 

103: 

104: do { 

105% if( (strlen( buf ) - 1) != width ) { 

106; fprintf(stderr,"Line %td: badwidth!\n",width) ; 
107s exit( 5 ); 

108: } 

109: for( i = 0; i < width; i++ ) { 

110: if( buf[{ i ]) == BLANK ) { 

tid: puzzle[{ length ]{ i ] = NIL; 

ti7: } else if ( buf({i] == PADCHAR ) { 

i132 puzzle[{ length ){ i] = buf[{ i ]; 
114: } else { 

115; fprintf(stderr,"BAD CHAR'%td'L# %d\n", 
116% buf[{i}, length ); 

117: exit ( 88 ); 

118: } 

11.9: } 

120: puzzle[{ length ][ width ] = NIL; 

121; length += 1; 
122: } while (fgets(buf,sizeof buf,fp)!=NULL && 
123% strncemp( WORDS, buf, strlen(WORDS) ) != 0 ); 
1243 
i253 /* 
126: * Words Section 
127: a f 
128: while( fgets( buf, sizeof buf, fp ) != NULL ) { 

(continued on page 54) 





Introducing Periscope” III 


A new generation of debugging for the IBM PC, XT, AT and close compatibles 


ow you can invest $995 and get the most powerful debugging tool available short of a 
$10,000 in-circuit emulator! The Periscope III board’s hardware breakpoints and real-time 
trace buffer help you solve the really tough debugging problems. If you ever deal with errors in 
real-time systems, intermittent failures, interfacing with undocumented systems, or bottlenecks 
in your code, Periscope III may be just what you need! 
The 


PERISCOPE 


Company, Inc. 


Call TOLL-FREE 800/722-7006 for more information. 
14 Bonnie Lane « Atlanta, GA 30328 « 404/256-3860 
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386|DEBUG 


e A symbolic debugger for 80386 32-bit 
protected mode programs which run 
under Phar Lap's 386|DOS-Extender™ 








e Breakpoints, data watchpoints, and built-in 
disassembler 


¢ Fully compatible with Phar Lap’s 386|ASM/LINK, 
the MetaWare 80386 High C™ and Professional 
Pascal™compilers, and the Green Hills 80386 
Fortran compiler 





e Runs on all DOS-based PCs equipped with an 
80386 CPU, including the Compaq® DESKPRO 
386™, the IBM®PS/2™ Model 80, and most 

accelerator cards, including the Intel Inboard™ 

386/AT 


e $195—Available today 







(617) 661-1510 


Phar Lap Software, Inc. 
60 Aberdeen Ave. 
Cambridge, MA 02138 





“The 80386 Software Experts” 
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CANADA’S 


SOURCE FOR C 





- Canadian Sales 
- Canadian Service 
- Canadian Technical Support 
- Canadian Product Knowledge 





We specialize in programming & development software 





LIFEBOAT « LATTICE * GREENLEAF « PHOENIX 
SOFTCRAFT « MICROSOFT « BLAISE ¢ ESSENTIAL 
AGE OF REASON « DESMET « AZTEC 
MARK WILLIAMS « GIMPEL * ROUNDHILL « GSS 
HALO « FAIRCOM « RAIMA « INTEL « etc. « etc. « 





aa Call for full price list Dealer enquiries welcome 





We know our products—we use them! 


SCANTEL SYSTEMS LTD. 
801 York Mills Rd., Don Mills, Ont., M3B 1X7 
(416) 449-9252 
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610 times faster than fixed-  .. 


Hard Locks 
for Soft Parts. 





At Rainbow Technologies, we think protecting 
software developers’ investments is very serious 
business. That’s why we designed the first fully 
effective security solution for software running on 
PCs and other computers. 


Our family of virtually impenetrable Software 
Sentinel hardware keys provides the highest level of 
software protection the developer can get. While 
remaining invisible to the end user. 


Take a look. 


Key Sentinel Family Features. 


Prohibits unauthorized use of software 9 No need 
for copy protection 9 Unlimited backup copies 5 
Virtually unbreakable 5 Pocketsize key 9 Trans- 
parent operation 9 Transportable 










O Higher level language 

Software interfaces included 
Sentinel. © Runs under DOS on 
O Runs under DOS and Xenix, PC/XT/AT and compatibles 

on IBM PC/XT/AT and O Parallel port version only 

compatibles . 
O Algorithm technique Software — : _ 

(Never a fixed response) Sentinel-X ] CC 


O Serial or parallel port version © Designed for workstations, 
© Minimal implementation effort supermicros and minicompute: 

_ OHigher level language __ - 2) Serial port only (mode 

_imvrfacesincludel Alvorithm techni 
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—___________, 
TRUE 


MULTITASKING 


With 





MultiDos Plus 
‘multitasking for the IBM-PC.’ 


Ideal for developing applications 
in process control, data acquisi- 
tion, communications, and other 
areas. Check these features which 
make MultiDos Plus an unbeat- 
able value. 


e Run up to 32 programs concur- 
rently. 

e Your software continues to run 
under DOS. No need to learn a 
new operating system. 

e Use the compilers you already 
have. Supports software written in 
most languages. 

e Operator commands to load/run 
programs, change priority, check 
program status, abort/suspend / 
resume programs. 

e Programmatic interface via INT 15H 
for the following. 


* Intertask message communica- 
tion. Send/receive/check mes- 
sage present on 64 message 
queues. 

* Task control by means of 
semaphores. Get/release/check 
semaphores. 

* Change priority-256 priority 
levels. 

* Suspend task for specified 
interval. 

* Spawn and terminate external 
and internal tasks. 

* Disable/enable multitasking. 

and more! 

e Independent foreground /back- 
ground displays. 

e Access to DOS while applications 
are running. 


Hardware/Software Requirements 


IBM PC/XT/AT or true clone. Enough 
memory to hold Multidos Plus (48 
KB) and all your application programs. 
Also may need 4 or 16 KB memory 
for ‘hidden screens’’ for each active 
task. MS-DOS (or PC-DOS) 2.0 or 
later operating system. 


only: $24.95 OR 
$99.95 


with source code 





Outside USA add $5.00 shipping and handling. 


Visa and Mastercard orders only call 
toll-free: 1-800-872-4566, ext. 350., or 
send check or money order to: 


NANOSOFT 


13 Westfield Rd, Natick, MA 01760 
MA orders add 5% sales tax. 
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_BACKTRACKING 





Listing One (Listing continued, text begins on page 24.) 


iZ3: 


{ 


for( i = 0; i < MAXWORD; i++ ){ 


if( FLAG( strlen(buf) - 1, i) == EMPTY ){ 


strncpy( WORD( strlen(buf) - 1, i), 
buf, strlen(buf)-1l ); 
FLAG( strlen(buf) - 1, i ) = FREE; 


} 
} 
if ( i >= MAXWORD ) { 
fprintf( stderr, "Out of space %d %s\n", 
strlen(buf)-1, buf ); 
exit( 6 ); 


} 


return; 


/* 
* SS SE ES DOSS SS SS SE ES ES SS EE a SE Ee 
” PPRINT(): display solved pzzle 
* SSS SSS SS SS SBSSSSST SSS SESS SSS VSO SSS SS SS SSB SS SS SS SSS Ss Ts = 
xf 
> pprint( t.:) 
: ant t; 
{ 
int Ly J 
switch( t ) { 
case ALL: 
/* 
* Debug only! 
wit | 
for( i = MINWORD; i < WORDLEN; i++ ) { 
a =U; 
while( WORD(i, 4) (0) != NIL ){ 
printf( "%s\n", WORD(i, 4) )3 
att; 
} 
} 
case PUZ: 
for( i = 0; i < length; i++ ){ 
for( 3 = 0; 4 < width; j++ ) { 
if( puzzle{ ijJ[{ 4] ){ 
putchar( puzzle{ iJ[{ 4) )3 
} else { 
putchar( BLANK ); 
} 
} 
putchar( "\n* .);3 
} 
} 
return; 
} 
/* 
* SS SS SSS SS SS SS SSS SS SS TS TV SS SS SSS SSS SS SS SS SSS SS SM SS SSS Ss sess 
* SOLVE(): function that searches for a solution 
*« SSS SS SSS SS SS SS SS SS SS SS SS SS SSS STS SS SSS SE SS SS SS SSS SS SS Ss ss 
a f 
;. Static int s = 0; 
>: static int prev = -1l; 


: solve( length, width ) 
: int 


length, width; 


int 1, w, i, len, tmp, type; 

char Old{ WORDLEN - MINWORD + 1 J}; 
w = width; 

1 = length; 


len = next( él, 
if( len == 0 ) 
return( SOLVED ); 


&w, &type ); 


for( i = 0; i < MAXWORD && WORD(len, i) [0] 
if( FLAG(len, i) == FREE 


f= NIL; it+ ){ 


(continued on page 58) 
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Clarify and document your source listing and get 


an “organization chart” of your program’s structure 


with two NEW utilities from Aldebaran Laboratories, for C, BASIC, 
Pascal, (BASE® FORTRAN and Modula-2 programmers 


“Occasionally, a utility 
comes along that makes a 
programmer’s life much 
easier. SOURCE PRINT 
is such a program. 

It contributes to the 
programmer’s job by 
organizing code into a 
legible format and by 
helping to organize the 
documentation and 
debugging process.” 


— PC Magazine 
Sept. 16, 1986 


Source Print and Tree Dia- 
grammer both have easy-to-use 
menus with point-and-shoot file 
selection, and let you search for 
files containing a given string. 
For IBM PC and compatibles 
with 256K. 

Join thousands of program- 
mers who are working more 
efficiently using Source Print 
and Tree Diagrammer. Order 
these indispensable tools today. 
We ship immediately, and 
there’s no risk with our 60-day 
money-back guarantee. Order 
both and save. Only $155.00. 


800-25 7-9 773 Dept. 58 


In California: 


800-25 7-9 7714 Dept. 58 


MasterCard, VISA, American 
Express, COD. Add $5 for 
shipping/handling. 


or see your local dealer! 


Source Print and Tree Diagrammer are 
trademarks of Aldebaran Labs. dBASE is 
a trademark of Ashton Tate. Prices subject 
to change without notice. 


04-06-86 13:45:44 
Sun 04-06-86 13:47:57 











Source Print” 


organizes your source code, simpli- 
fies debugging, and makes documen- 
tation a snap! It lists one or more 
source files with informative page 






150 FOR INDX = 1 TO 100 
160 IF TB(INDX) = O THEN X = 5 












170 C = 50: WHILE K <= 1000: TB(K) = 0: K = K + X: WEND 
180 GOSUB 2000 

190 XT(C) = X: T2(C) = K: C=C #1 

200 NEXT INDX 








(--- FOR INDX = 1 TO 100 
160 IF TB(INDX) = O THEN X = 5 
C= 5 


0 

WHILE K <= 1000 
TB(K) = 0 
K=K +X 








: Before 

headings and op- GOSUB 2000 

* ° XT(C) xX 
tional line numbers, 1s 
while offering 3 F r < nres & ares({iar)({0) == c) 
. 5 = ares(iarjJ({1])) == 0) 
invaluable features: 

The Index 


Wed 12-31-86 07:22:03 INDEX (Cross Ref) 
all identifiers 


(Cross-Reference 
list) saves you time 
by showing exactly 
where variables are 
used and where functions, pro- $9 700 
cedures, and routines are called. 

Locations where new 
cen 989 values may be assigned to 
variables are shown, making it easy to track down that 
mysterious value change. 

Structure Outlining solves the problem of hard-to- 
see nested control structures by automatically drawing 
lines around them. 

Automatic Indentation of source code and listings 
reduces your editing time and ensures indentation accuracy. 

Plus... Source Print generates a table of contents 
listing functions and procedures. Keywords can be printed 
in boldface on most printers. Multi-statement BASIC lines 
can be split for readability. Functions and procedures can 
be drawn by name from one or more source files to form a 
new file. 


e TM 

Tree Diagrammer SEROEF Eas 
shows your program’s overall organization at a — - 
glance. Ordinary program listings merely display 
functions, procedures, and subroutines sequen- 
tially, but do not display the relationships be- 
tween these routines. Our revolutionary new 
Tree Diagrammer automatically creates an 
“organization chart” of your program showing the 
hierarchy of calls to functions, procedures, and 
subroutines. Recursive calls are indicated and 
designated comments in the source code 
will appear on the chart. 

Tree Diagrammer helps you organize your 
program more logically. And you’ll be amazed at 


how easy it is to debug when you ¢ 7 700 
















4.191 9=396 19.825 19=826 
21.889 22.922 22.953 23=978 
23.990 


inrecord 
























ins 53.2293 53=2309 53=2319 53.2325 
54.2331 54.2332 54.2336 54=2346 


54.2354 54.2364 54.2365 54.2366 















4.193 9=395 
43=1820 45=1902 


43.1796 43.1815 


Index 


intext 

















see how your routines interact. 


Aldebaran Laboratories 3339 Vincent Rd. Pleasant Hill,CA 94523 415-930-8966 


YES Rush IME O Source Print @ $97, _______ [_] Tree Diagram mer @ $77. _______ 
[] Both $155. Ship/Handling $5. For CA add 6% tax —________ Total 

Name 
Company 
Address 
City State 
[]Checkenclosed [LIVISA []MasterCard [1] American Express 

Card # Exp. Date 
Signature —__ EE d?Phone # —___ 58 











Zip 
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THE PROGRAMMERS SHOP 








helps save time, money and cut frustrations. Compare, evaluate, and find products. 





RECENT DISCOVERY 


C+ + by Abraxas - preprocessor 
generates MS C source. Classes include 
File I/O, Screen, Keyboard, Mouse, 
Printer, DOS, BIOS, Memory 
management, Communications, 
Realtime, Source. PC $ 269 


Al-Expert System Dev't 
Arity Combination Package = PC $ 979 


System - use with C MS $ 229 
SQL Dev’t Package MS $ 229 
Auto-Intelligence PC $ 739 
Exsys PC $ 309 
Runtime System PC $ 469 
Insight | MS $ 75 
Insight 2+ MS $ 379 
Intelligence/Compiler PC $ 739 
T.I.: PC Easy PC $ 435 


Personal Consultant Plus PC $2589 
Personal Consultant Runtime PC $ 85 
Turbo Expert-Startup(400 rules) PC $ 129 
Corporate (4000 rules) PC $ 359 


Al-Lisp | 


Microsoft MuLisp 85 MS $ 159 
PC Scheme LISP - by TI PC $ 85 
Star Sapphire MS $ 459 
TransLISP - learn fast MS $ 89 
TransLISP PLUS 

Optional Unlimited Runtime $ 139 


PLUS for MSDOS $ 179 
Others: IQ LISP ($155), IQC LISP ($269) 


Al Prolog 


APT - Active Prolog Tutor - build 
applications interactively PC $ 49 
ARITY Prolog - Interpreter PC $ 229 
COMPILER/Interpreter-EXE PC $ 569 
Standard Prolog MS $ 77 
MicroProlog - Prof. Entry Lev. MS $ 85 
MicroProlog Prof. Comp./Inter. MS $ 439 
MPROLOG P550 PC 3 175 
Prolog-86 - Learn Fast MS $ 89 
Prolog-86 Plus - Develop MS $ 229 
TURBO PROLOG by Borland PC $ 69 


Turbo Prolog Toolbox PC $ 69 
BAS_C - economy MS $ 179 
BAS_PAS - economy MS $ 135 
Basic Development System PC $ 105 
Basic Development Tools PC $ 89 
Basic Windows by Syscom PC $ 95 
BetterBASIC PC $ 129 
Exim Toolkit - full PC $ 39 
Finally - by Komputerwerks PC $ 85 
Mach 2 by MicroHelp PC $ 55 
QBase - by Crescent Software MS $ 89 
QuickBASIC PC $ 69 
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Periscope III - debugger with 64K 
protected RAM and breakout switch; 
breakpoints for hardware, memory, 
port, data. Real-time trace buffer, 
pass counter. PC $ 829 


CxPERT - Expert systems 
shell, translates to C code to 
integrate with your application. 
Certainty factors, explanations, 
inheritance, frames, help. MS $ 295 


‘‘Programmers at Work” — FREE 


This fascinating book from Microsoft features inter- 
views, biographies, code doodles — a detailed look 
at the backgrounds, philosophies, and working 
styles of 19 of today’s most influential program- 
mers: Jonathan Sachs, Dan Bricklin, Bill Gates, and 
C. Wayne Ratliff among them. NOW you can get 
‘Programmers at Work” as a bonus from The Prog- 


rammer’s Shop. Just call our toll-free number and 
place your order totaling $250 or more and you ‘Il re- 
ceive this incredible book (regularly $14.95) FREE! 


Our Services: 
+ Programmer's Referral List + Dealers Inquire 
* Compare Products + Newsletter 
* Help find a Publisher * Rush Order 
+ Evaluation Literature FREE * Over 700 products 
« BBS-7 PMto7 AM 617-740-2611 * National Accounts Center 


Quick Pak-by Crescent Software PC $ 65 
Turbo BASIC - by Borland PC $ 69 


Cobol I/Q - query, report, graphs PC $ 539 





Microfocus Professional Cobol PC $1699 
VS Workbench PC $3379 

Microsoft COBOL MS $ 439 
Microsoft Cobol Tools PC $ 209 
Personal COBOL PC $ 129 
Realia - very fast MS $ 819 
Ryan McFarland COBOL MS Call 
COBOL-85 MS Call 


Screenplay - screen mgmt. PC $ 129 
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Asynch by Blaise PC $ 125 
Essential Comm Library PC 3 125 
With Debugger PC $ 189 


Multi-Comm - add multitasking PC $ 135 


fo] SANS) me mel ale [er-le[= 
Clipper compiler PC Call 
dBASE I] MS $ 329 
dBase III Plus PC $ 429 
dBASE III] LANPack PC $ 649 
DBXL Interpreter PC $ 139 


FoxBASE+ - single user MS $ 349 
QuickSilver by Word Tech PC $ 499 


dBASE Support 





dBase Tools for C PC $ 65 
dBrief with Brief PC Call 
dBC ISAM by Lattice MS Call 
dFlow - flowchart, xref MS~ Call 


Documentor - dFlow superset MS 
Genifer by Bytel-code generator MS $ 299 
QuickCode III Plus MS $ 239 
Tom Rettig’s Library PC $ 89 


UI Programmer - user interfaces PC $ 249 
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BRIEF Programmer's Editor PC Call 


EMACS by UniPress Source: $895 


Epsilon - like EMACS PC $ 149 
KEDIT - like XEDIT re 99 
Micro Focus Micro/SPF PC $ 139 
PC/EDT - macros PC $ 229 
PC/VI - by Custom Software MS 

Personal REXX PC 99 


PMATE - power, multitask Pe 


PA AMAMAMAMAMMAM & 
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SPF/PC - fast, virtual memory PC 189 
Vedit MS 99 
Vedit PLUS MS 129 


RECENT DISCOVERY 


TP2C - Translate Turbo Pascal to 
formatted K & R C (proposed ANSI 85 
standard). Include files, in-line 
code, nested procedures, 95 + % 


successful conversion PC $ 219 
om MF-Tave [Ur-\e (=m @xelanl vie 

AZTEC C86 - Commercial PC $ 499 
C86 PLUS - by Cl MS $ 379 


Datalight C - fast compile, good code, 
4 models, Lattice compatible, 


Lib source. Dev’rs Kit PC $ 77 
Datalight Optimum-C MS $109 
with Light Tools by Blaise PC $168 
Lattice C - from Lattice MS $269 
Let’s C Combo Pack PC $ 99 
Lets © PC $°37 


Microsoft C 4.0- Codeview MS $275 
Rex - C/86 - standalone ROM MS $695 
Turbo C by Borland PC $ 69 
Uniware 68000/10/20 Cross 

Compiler by SDS MS Call 


om MF-TateiUr-tel-ailal(1g eg (16- 


C-terp by Gimpel - full K & R MS $219 
C Trainer - by Catalytix PC $ 89 
INSTANT C - Source debug, 

Edit to Run-3 seconds, .OBJs MS $369 


Interactive C by IMPACC Assoc. PC $209 
Run/C Professional MS $155 
Run/C Lite MS $ 79 
C Libraries-General 
Blackstar C Function Library PC $ 79 
C Function Library MS $109 
C Tools Plus (1 & 2) - Blaise PC $119 
C Utilities by Essential PC $119 


C Worthy Library - Complete, machine 


independent MS $249 
Entelekon C Function Library PC $119 
Entelekon Superfonts for C PC $ 45 


Greenleaf Functions-portable, ASM $139 
LIGHT TOOLS by Blaise PC 3 69 


C Libraries-Files 


C Index by Trio MS $ 89 
/File is object only MS $ 89 
/Plus is full source MS $319 

BTree by Soft Focus MS $ 69 


CBTREE - Source, noroyalties MS $ 99 
CTree by Faircom- noroyalties MS $315 
rtree - report generation PC $239 
dbQUERY - ad Loc, SQL - based MS $129 
dbVISTA - full indexing, plus optional 
record types, pointers, Network. 
Object only - MS C, LAT, C86 $129 


Source - Single user MS $389 
Source - Multiuser MS $799 
dBx - translator MS $299 
w/source to library MS $429 





FEATURE 


SSP/PC - fast math subroutine library 
inC and Assembler for C, Fortran, 
Pascal, and BASIC. 145 + routines 
include trig, elementary, hyperbolic, 
and gamma; chi square, polynomials, 
more. 8087 Support. PC $269 
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THE PROGRAMMERS SHOP 


provides complete information, advice, guarantees and every product for Microcomputer Programming. 


— C Tools — 
SPECIAL PRICES 


These tools at right represent 1000’s of hours of 
development effort. They’re also among the most 
stable and popular tools we sell. Choose the ones 
that fit your application, and give your productivity 
a boost. In doubt? Call one our C Specialists 
today. 


C Support-Systems 


Advantage C+ + PC $479 
C Sharp - realtime, tasks. PC $495 
C ToolSet - DIFF, xref, source MS 
The HAMMER by OES Systems PC $129 





Lattice Text Utilities MS $ 89 
Multi-C - multitasking PC $135 
PC LINT-Checker. Amiga $89 MS $ 99 
Pfantasy Pac - by Phoenix PC $619 
PforCe + + PC $239 
Pre-C - Lint-Like MS $155 


Quickshell - script compiler PC $349 
Sapiens V8 - 8M workspace PC $269 
SECURITY LIB - Source $229 PC $115 
Timeslicer PC $265 

with library source 


C-Screens, Windows, Graphics 
C Power Windows by Entelekon PC $109 


Curses by Aspen Scientific PC $109 
Curses by Lattice PC $ 89 
dBASE Graphics for C PC’ 3.69 


ESSENTIAL GRAPHICS - fast PC $185 


GraphiC - new color version PC $285 
Greenleaf Data Windows PC $159 

w/source PC $289 
LightWINDOWS/C-for Datalight C PC $ 
Multi- Windows - use w/ Multi-C PC $295 
Screen Ace Form Master PC $195 
Vitamin C - screen I/O PC $159 
Windows for C - fast PC $189 
Windows for Data - validation PC $319 
View Manager - by Blaise PC $179 
ZView - screen generator MS $169 


DY=) ol Ufo fe [= ¢-) 


386 Debug - by Phar Lap PC $129 
Breakout - by Essential PC $ 89 
CODESMITH - visual PC. 5 99 
C SPRITE - data structures PC $119 
Periscope | PC $289 
Periscope II PC 3139 
Periscope II-X PC $105 
Pfix-86 Plus - by Phoenix PC 3229 
Turbo TDebug Pe 3:55 
Showcase - test software PC 3125 


SoftProbe II - embedded systems PC $695 


FEATURE 

C Scape II - by The Oakland Group. New 
version includes screen editor, still 
captures Dan Bricklin screens. Auto data 


array handling, horizontal scroll. PC $279 


Call for a catalog, literature, advice and service you can trust 


HOURS eS 


8:30 AM - 8:00 PM EST. 





Order before August 31, 1987, and 
mention this ad for these 
SPECIAL PRICES: 


List Normal SPECIAL 
$395 $315 $279 
$185 $139 $109 
$185 $129 $109 
$225 $159 $139 


ctree by Faircom 

Greenleaf Function Library 
Communications Library 
Data Windows 

C Index + - stable, tested 
B + tree 

Halo by Media Cybernetics 


$395 
$300 


$319 
$209 


$289 
$189 
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50:More FORTRAN PC $ 95 
ACS Time Series MS $399 
Forlib+ by Alpha MS $ 59 
I/O Pro - screen development PC $129 
MACFortran by Microsoft © MAC $229 
MS Fortran - 4.0, full 77° MS $279 
No Limit - Fortran Scientific PC $109 


PC-Fortran Tools - xref, pprint PC $165 
RM /Fortran MS Call 
Scientific Subroutines - Matrix MS $129 


Multilanguage Support 


BTRIEVE ISAM MS $185 
BTRIEVE/N-multiuser MS $455 
Flash-Up Windows PC 3.79 
GSS Graphics Dev’t Toolkit PC $375 
HALO Development Package MS $389 


Informix 4GL-application builder PC $789 
Informix SQL - ANSI standard PC $639 
NET-TOOLS - NET-BIOS PC $129 


Opt Tech Sort - sort, merge MS $ 99 
PANEL MS $215 
Pfinish - by Phoenix MS $229 


PolyBoost - speed I/O, keyboard PC $ 69 
Prime Factor FFT - 8087/287 PC $145 
PVCS Corporate-source control MS $309 


PVCS Personal MS $109 
QMake by Quilt Co. MS $ 79 
Report Option - for Xtrieve MS $109 
Screen Machine PC 3°59 
Screen Sculptor PC $ 95 
SRMS - new version MS $159 
Synergy - create user interfaces MS $375 
VXM - multi-env. link MS $195 
Xtrieve - organize database MS $199 


ZAP Communications- VT 100 PC $ 89 
a= i-{er-] lace mele] °) elelatiare 


ALICE - learn Pascal PC $ 49 
Exec - Chain Programs MS $ 79 
MetaWINDOWS- graphics toolkit 
bit-mapped, fast PC $115 
MetaWINDOWS PLUS PC $185 
Microsoft PASCAL - faster MS $189 
Pascal Pac with Tidy PC $ 49 
Pascal Tools PLUS PC S119 
Pascal 2 - by Oregon Software MS $329 
Turbo Extender by Turbo Power PC $ 65 
TurboHALO - 150 routines PC $ 99 


DataBase & File Management 


DataFlex by Data Access PC $ 899 
Dataflex multiuser PC $1149 
VP-Info - dBASE-like PC $_79 


800-421-8006 


THE PROGRAMMER’S SHOP ™ 


Your complete source for software. services and answers 


5-L Pond Park Road, Hingham, MA 02043 
Mass: 800-442-8070 or 617-740-2510 6/87 


RECENT DISCOVERY 


C Worthy Interface Library - Complete, 
tested human interface for MS C, Lattice 
or Turbo C. Full screens, Windows, 
DOS, Error handling, Menus, Messages. 
Source separate, no royalties. 


PC $ 249 





Other Languages 
APL*PLUS/PC PC $ 429 
CCS Mumps - Multiuser PC'S. 359 
Microsoft MASM MS 98 
Modula-2 Apprentic Pkg. PC 79 


Modula-2 Wizards Package PC 
Pasm - by Phoenix MS 
PC Forth+ - by Lab Micro = PC 
Smalltalk/V MS 
SNOBOL4 + - great for strings MS 
UR/Forth MS 


P-eAAAAHAAAAASH 
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Basic - by Microsoft $ 209 
C-Terp by Gimpel Software $ 379 
Cobol - by Microsoft $ 609 
Cobol Tools - by Microsoft $ 319 
Fortran or Pascal - by Microsoft $ 419 
Foxbase + $ 689 
MicroFocus Lev. II Compact COBOL$ 795 
Panel + 535 
Real-Tools - $ 89 
RM/Cobol or RM/Fortran Call 
Xenix Complete System $ 999 
Xenix Development System $ 499 


@} dal-) mi od cole [les cs 


386 Assembler/Linker PC 
Advantage Link PC 
ASMLIB - 170+ routines PC 
asmTREE - B + tree file mgmt. PC 
Back-It - flexible, fast PC 
Dan Bricklin’s Demo Program PC 
Disk Technician - smart disk 

upkeep PC 
Help/Control - on line help PC 
Interactive Easyflow-HavenTree PC 
Link & Locate - Intel tools 
LMK - like UNIX make 


$ 389 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
Microsoft Windows PC $ 69 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 


359 
125 
339 
89 
59 


Software Development Kit = PC 
MKS Toolkit - Unix, vi, awk PC 
Norton Commander PC 
Numerical Analyst by Magus PC 
PLink - 86 PLUS - overlays 
Polymake by Polytron 
PolyShell by Polytron 
PolyXREF by Polytron PC 
PMaker - by Phoenix PC 
Quelo 68000 X-ASM PC 
Sapiens V8 - 8M virtual mgr. PC 
Source Print - by Aldebaran PC 


‘Taskview - ten tasks PGS: 5 
Tree Diagrammer PC $ 45 
Visible Computer: 8088 PC $ 65 
Xtree - classic graphic tree PC $ 45 


Note: Mention this ad. Some prices are specials. Ask about COD 
and POs. Formats: 3” laptop now available. plus 200 others. UPS 
surface shipping add $3/item. All prices subject to change without 
notice. 





“I like your straightforward, open evaluations, 
comments and selection.” 


Chris Chapman 
Practical Solutions Software 








MetaWINDOW 


roduct of the Month 
"... a technological tour de 
force for fast PC graphics." 


NO ROYALTIES! 


| MetaWINDOW provides an expana- 
| ed set of graphic drawing functions, 
| plus the added functionality and 

| performance required for designing 

| multi-window desktop applications. 


¢ auto-cursor tracking 
* pull-down menus 
* pop-up windows 


* comprehensive 
graphic functions 





: ° multiple fonts 10Pont 12 Point 


Display multiple bitmap or 
"filled-outline" fonts. 

Face fonts for bold, italic, under- 
line or strike-out stylings. 

Full "RasterOp" transfer 
functions for writing, erasing, 
rubberbanding or dragging: 
lines, text, icons, bit images 
and complex objects. 


Create pop-up menus, ee 


windows and icons. 
* Supports IBM's new PS/2 VGA 
and MCGA graphics. 


MetaWINDOW cor 
langauge bindings 


gf aphics adaptors 
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Listing One (Listing continued, text begins on page 24. ) 


206: && itfits(l, w, WORD(len, i), type) ){ 

207; FLAG(len, i) = USED; 

208: enter( old, 1, w, WORD(len, i), type ); 
209% prev = type; 

210: tmp = solve( l, w ); 

211: if( tmp == SOLVED ) 

Zi2: return( SOLVED ); 

Zi3: restore( old, l, w, type ); 

214: FLAG (len, i) = FREE; 


216: ) 


218: return( 0 ); 


223: * NEXT (): locate next slot to fill 


SSS S232 [55555 5555S E2552 55555 55 55 >= >= SS SS SS SSS 


226: next( len, wht, t ) 

227% int *len, *wht, *t; 

228: { 

229: /* 

Return the next slot in the puzzle to attempt 
to be solved. DOWN has precedence. 


The new values for len & wht will be updated. 
The returned value for the '‘w' coordinate for 
an across ‘hit' will have to be the value + 1. 


N 
WwW 
Ww 
+t 4@ 0@ © 0 


236: */ 
233i: Int l, w, tmp; 


239: 1 = *len; 
240: w= *wht; 


242: i= 

243: * Check current position for across: down would 
244: * have been done already. 

245: */ 

246: if( w!=-1 66 ( (w- 1) <0 {] puzzle[1] [w-1] == NIL ) 
247: && puzzle(1l](w] && (w+ 1) < width && puzzle[1]} [wtl] ) { 
248: /* 

249: * Across! 

290% «/ 

2a13 *t = ACROSS; 


293% s* 

254: * Neccessary Evil! 
255% =] 

256: *wht = w+; 


258: tmp = 0; 

2592 while( puzzle(1l)[(w) != NIL && w < width ) { 
260: w t= 1; 

261% tmp += 1; 

262: } 

263: return( tmp ); 


265: } else if( prev == DOWN || w == -1 ){ 
266: w t= 1; 
267: } 


269: ;* 

270: * Check for next possible position 

271; */ 

2i2: for(; 1 < length; 1 t= 1 ){ 

273: for(; w < width; w t= 1 ){ 

274: if( ( (1 - 1) <0 [|] puzzle[1l-1){w) == NIL ) 
275: && puzzle({1l)(w] != NIL cs (1 +1) < length 
276: && puzzle[1l+1][(w]) != NIL ){. 

277: /* 

278: * Down ! 

279: xy 

280: *t = DOWN; 


(continued on page 60) 
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How to tackle 
a 300 page monster. 


Turn your PC into a typesetter. 


If you're writing a long, serious document on your IBM PC, you want it to 
look professional. Precise. Easy to read. You want MicroTpX. g 

MicroTpPX was designed especially for desktop publishers (a 
who require heavy duty typesetting. It is based on the TpX stan- (Mf 
dard, with tens of thousands of users worldwide. Documents 
from smaller than 30 pages to 5000 pages or more. 
And that’s something that other programs just 
can’t match. 

No other PC software gives you as many 
advanced capabilities as MicroTfX. Superior 
hyphenation control, the sophistication of liga- 
tures ( ffi, fi) and kerning; down-loadable 
fonts; aesthetic handling of math (x = f’(z)), 
and foreign language characters; complex table 
construction and multi-column tasks; dot 
matrix, laser printer and phototypesetter 
output. When used with our LAT RX 
macro package, it automatically enu- 
merates and cross-references 
pages, sections, footnotes and illus-_ 
trations. Plus it automatically ' 
creates your indexes, tables of con-, 
tents, and even updates them for 
you after last minute insertions. 

So if you want typesetting 
software that’s as serious as 
you are about your writing, 
set MicroTpX. Call 
617-944-6795 to order or 
for more information* Order 
with a 60-day money back 
Suarantee. 















































Now available for Macintosh. 


Microl pA 
from Addison-Wesley 


Serious typesetting for 
serious desktop publishers. 


*Dealers, call our Dealer Hot Line: 800-447-2226 
(In MA, 800-446-3399), ext. 2643. 
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Dpasex 


programming tools 


*Clipper, FoxBASE+, 
dBASE, QuickSilver 


The Ul Programmer 


Ul is the first professional code generator; we 
wrote UI for programmers who want to automate 
their work but cannot use code that is ‘almost’ 
good enough. If your user interfaces include 
bounce-bar menus, pop-up help screens and 
the other features of today’s best programs, you 
will gain an order of magnitude in productivity 
with UI. 


Ul is a second generation, programmable pro- 
duct — so your code comes out your way. 
Application specific edits, for instance, can be 
placed in the UI ‘template’ which controls the 
generation. Edit the screen appearance until it 
‘looks and feels’ perfect. Everytime you generate 
code, your special logic is preserved. 


Speaking of editing the screen, Ul includes a 
powerful, 3-D screen editor, so you can draw 
pop-up help boxes over your pull-down menus, 
over your application. 


The Documentor 


To run Doc, you just tell it the name of the main- 
line routine and make sure your printer has a lot 
of paper! (Sure, you can have the output go to 
the screen or a file, too.) 


You can tailor your documentation to include any 
or all of: a table of contents, system tree diagram 
(main line is the root), hierarchy (box diagram) 
charts for each module, action diagrams (modern 
style flow charts) for each PRG or procedure, 
DBF listings (structure, indexes, more), where 
used/updated listings for fields and all variables 
— by module and by line number within each 
module. 


Our written money-back satisfaction guarantee 
set a new standard when we began it in 1985. 
(Return rate to date: 9.6% and dropping!) No 
copy protection, royalties or other nonsense. 


Suggested retail: $295 each, (800) support 
included. At your dealer today. Call us for a very 
special offer on our latest release! (800) 233- 
3569 or, in NY, (212) 406-7026. 


WallSoft 


The Computer Aided Software 


Engineering Corporation 
233 Broadway, Suite 869, New York, NY 10279 
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281: 
282s 
283: 
284: 
205% 





at f 


: 2tfritst{ 
: char 
> int 


{ 


*« 


aif 


char 
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Listing One (Listing continued, text begins on page 24.) 





prev = DOWN; 


*wht = w; 

*len = 1; 

tmp = 0; 

while (puzzle[1] (w]!=NIL && 1<length) { 
1 += 1; 
tmp += 1; 


} 
return( tmp ); 


} 
if( ((w- 1) < 0 || puzzle[1l) (w-1]) == NIL) 
&& puzzle[{1l)[w]) && (wtl) < width 
&& puzzle(1) [wtl) ) { 
/* 
* Across! 
a7 
*t = ACROSS; 
prev = ACROSS; 
*len = ]; 
*wht = w+ 1; 


tmp = 0; 

if( w == -1) w= 0; 

while (puzzle({1l}(w] != NIL &&w<width) { 
w t= 1; 
tmp += 1; 

} 

return( tmp ); 


w = 0; 
} 
/* 
* Puzzle Completed! 
ad! i 


return( 0 ); 


I 


ITFITS(): determine is a word fits into a slot 


l, w, word, t ) 
*word; 
C; 


char *cp; 


if({ t == ACROSS && w != -1) 
w -= 1; 


cp = word; 
while( *cp ) { 
if( *cp != puzzle[(1l)[(w) && puzzle[{l][w]) != PADCHAR ) 
return( O ); 
if( t == ACROSS ) 
w += 1; 
else 
1 += 1; 
cptt; 
} 


return( 1 ); 


—— Ss ==. SS SS lS ES = —— — -———— 


eee st 


: enter( old, 1, w, word, t ) 
: char 
: int 


*old; 
Li: “We 
*word; 





(continued on page 62) 
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e Use up to 255 windows 
e No special window commands; use print f () 
verything you need to write dramatic e Resize and move windows 
graphics effects into your Eco-C88 C e Custom window titles and borders 
programs. Some of the features include: | ® Can be used with ANSI device driver 
e Support tor EGA, CGA, and Z100 e Most of window's code-data lies outside small 
e Over 100 graphics and support functions, many model limits 
of which are PLOT-10 compatible. e Use any of the IBM text or block characters 
© Many low level support routines reside outside | ® User's manual and examples wa 
al ail sa Seta eee The Windowina brary requiesen IBM Re A C compiler with many ANSI enhancements 


at an unbelievably low price. The Eco-C88 C 
e Can write dots thru the BIOS (for compatibility) | compatible BIOS and the Eco-C88 C compiler. compiler has: y . 


or to memory (for speed) | NY 2 Ge e Prototyping (the new type-checking 
e Graphics function help from CED editor enhancement) 





available . e Enum and void data types 
e World, pixel or turtle color graphics modes e Structure passing and assignment 
e 47 standard fill patterns, 17 line dashing e All operators and data types 
patterns, Hershey fonts, plus user defineable e A standard library with more than 200 func- 
fill, dash and fonts — tions (many of which are System V compatible 
e Supports view areas, rotateable fonts, clipping, for greater code portability) 
arbitrary fill areas, extensive error checking, Now you can combine your modules, functions, |} ® CC and mini-make that all but automates the 
examples, and user's manual. and subroutines into your own library for easy link compile process 
A must for the graphics enthusiast and a commands. Fully compatible with ANY standard e 8087 support (we sense the 8087 at runtime 
bargain at only OBJ format files (not just Ecosoft’s products). — no dual libraries) 
a With the Ecosoft librarian, you can: e ASM or OBJ output for use with MSDOS linker 
e Add, delete, and extract from a library e Tiered error messages — enable-disable lint- 
e Cet table of contents or index of a library like error checking 
*Requires Eco-C88 C Compiler. e Combine libraries, control library page size, use | ¢ Fast compiles and executing code 
switches for combinations, process complex e Expanded user’s manual 
library requests, use wildcards, and do library e CED full-screen program editor 
directives from command files. Everything you need at the unbelievable 
e Complete with user’s manual price of $59.95. 
A valuable addition for any programmer. Eco-C88 C compiler requires an IBM PC, XT, or 





AT (or compatible) with 256K of memory, 2 disk 
ONLY 29.95 drives and MSDOS 2.1 or later. 





This windowing library allows you to add pop up 


























windows in your C programs quickly and easily. Orders only: 
Use them for help windows, selection menus, error | -800-952-0 472 Ecosoft Inc. 
messages, special effects — anywhere you need a0 | Technical Information: | 6413 N. College Ave. 
attention getter. Just some of the features include: 317) 255-6476 TT . Indianapolis, IN 46220 
e CGA, EGA, and monochrome support ( ) ‘ 
e Slow mode option for ‘'flicker”’ displays eee aes ees eee ees eee ie eee! 
e Control any program that goes through the ORDER FORM CLIP & MAIL TO: Ecosoft Inc., 6413 N. College Ave., Indianapolis, IN 46220 
ee ITEM PRICE QTY. TOTAL 

Flexi-Graph Graphics $39.95 

Window Library $29.95 

Eco-Lib Librarian $29.95 

Eco-C88 C Compiler CED $59.95 

SHIPPING 


———— 


TOTAL (IND. RES. ADD 5% TAX) 


PAYMENT: CJ VISA CL] MC LC) AE (1) CHECK 


EXPIR DATE 





CARD # 





NAME ___._—Ss—sSsSsSSSSSSSSSSSSSSSSFSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS Ts ———— 


ADDRESS ____ESsSsSsSSSSSSSSSSSSSSSSFSSSSSSSSSSSSSSSSSSSSSSSS 


STATE 





CITY —_ 


PHONE ___—SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS tl 
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ZIP 





25 SREP PECCOSOIIILELLLELLELLELIEL LL LDLLL ELE IELLED EEL LET 


SaeaanEtaaesee SISOS RRR RRR IRR IRR RI RESETS BEES SES SESE SEES ESEEA BESTE BESS OBIS 


58588888 EERIE RESIS SOS ESR ORIEL I OOOO OOO OLLOOL EELS EEE EES SSSI ESSEC LESSEE OO oS 


SERRE POSIBLE EELS LILLIE DILL LL DIAT 
SBR RRR RESIS PEG OREO IES GLO SISSSLESSOISELLELLOLLLILLLL LEBEL LLL ILDEPLILLLECLALLAELL PELE 


0889 E8ELRECLREEELEBEEEEEELLLELLLELELLELLLPLEPAPLL LPL LECLLEBELPELLEALEAPLLLELLELLLILLELL LIPS ELLLLL PLDI 
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Listing One (Listing continued, text begins on page 24.) 


3562 int c? 
aoe 4 
358: char “cp; 


360: if( t == ACROSS ) 
361: w -= 1; 


363: cp = word; 

364: while( *cp ) { 

365: *old++ = puzzle[l1])[w]; 
366: puzzle[1l)[w] = *cp; 
367: if( t == ACROSS ) 

368: w t= 1; 

369: else 


é i 2 cpt+t; 
372: } 
373: *old = NIL; 


375: return; 


379: * iesienianioesienenatentenietanienoesantenseatentastentententamnetentantentesemtecietmeatermedammntesmmiandenmentantentmtentantentettemteeteeetetetestetetenton 
380; * RESTORE (): restore puzzle to prev state 

381: * SSS SS Sessa sa sa sS ese SS SS SS SSS SS SS SS SS SSS SS SS SS SH SSS SS SESS SS SS= 
382: */ 

383: restore( old, l, w, t ) 

384: char *old; 

385: int le Wy EB 

386: { 

387: char *Cp; 


399: if( t == ACROSS ) 
390: w -= 1; 


392: cp = old; 

393; while( *cp ) { 

394: puzzle[1] ([w]) = *cp; 
395% if( t == ACROSS ) 
396: w t= 1; 

i i  &- else 

398: 1 += 1; 
399: cptt; 

400: } 


402: return; 


End Listing 
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elds. Create spread 
snerate C code with 


C-scape 2.0 
Qook Xf cel ws 


The state-of-the-art interface management 
system preferred by professional C 


programmers and consultants worldwide. 


se of logical cok 


Rook cee 


e WYSIWYG screen design tool 

e Generates readable C code 

e Create menus and data entry 
screens 

e Define fields of any type 

Variables, prompts, and validation 

Line draw and erase 


C-scape 2.0 


e Windows, windows, windows 
e Menus, menus, menus 

e Vast help system 

e Create any type of field 


Block, move, cut, paste, copy ° me te validation 
Horizontal and vertical scrolling e 7 sian me aoe ib 

Edit Dan Bricklin Demo slides a . ea ee . ean 
Fall’ color-support wappable device drivers 


Fast, easy, and fun to use : — 7 sl Algae dif 
Includes help Y a ary 


Full-feature demo available ° Unsurpassed flexibility 
e Professional manual 
° No royalties; no run-time license 
e Source code included 
e Demo package available 


Oakland Group, Inc. (J 


675 Massachusetts Avenue 
Cambridge, MA 02139-3309 


800-233-3733 CALL 
617-491-7311 NOW 


PC/MS-DOS $279, plus shipping (includes C-scape, Look & Feel, 
source, manual and support). UNIX/others call. 30-day review. 





‘ a RWS. “MQ aK QW 
> BASES ; WA SS SSS SN : Y SS 
f x 3 Nel A ~— 
i x ANAS So \ \ 3 WSN x NY toe 


Y 
y ; A\Sae 
WIE 
Sy SOY Re NR SRN 


LO \ 


Ss x 
‘ —) 
~ . if . AS 


CRE 


AS 
Ne RSE SS 


YOR RANK : 


= \\ 
ag SO 
b \ Sys 


His 
/ 
hal 
; 


4 ' 
LZ) A ; 
ny "Y Lo Yj 


id 


A 


ep 


Z 
j 


S 


\ + 


IAG 
Wig 


is 


ie 0 a 


4 


Wy, v4 4 

¢ ALE 
14 fp 
LS Ned PI 


ANy 


ANY 
AN 


iS 
\) . N 

RQ ~*~ 
SIMA VS 


/ 
% 


4 7 Le 
Dy Qh? 


7 ’ \w 
wv 


\ 
a 


4, 
74 SL Sa 
POG 


: XS 


KN SNES 
WE SAMOS | 

~) WS 
x : \ \\ ae a SE 


Ah 
WS RY Wh 


NY 
a 


\ ~~, ~=a\ bs — \ 
te & mS ANN), =e uss > be 
‘ : wes ~ 


+ ~ — eee ig Ry 
Ne = we Sie oS enwdte.. So v 


p, 
Io-g' 


a 2 
Ni et 
a . {4 
> Li a a 
yy BG (on 


Vol 


~ 


SANS 
van 


> 


v, 
~ 
NN 


[A 
Pe. VGC Ve) f 
i a 


14 


WT at 


Oe 


@& 

) A, y, a ae, 
4) 
4 


. re ~ ~S 


\ 
TARR \ 
& YON Wes 
\ 


1% 
Ze g y, ‘Zz; 
if f) ine 4 nS t 
LY 


v 
4 
at 
4'/ 

/ 


4: 
A 
(i 
Ad 


S SSNS 
WAG 


‘\ \ 
oN 
ASE 


\ he. = ~“ Ry L\ ~\ 
Wwe QA ES: AWA NY 
aa 
re . 


x 
~ 


SK 
pte oN 
=) 


2% ya 2 ~: ; 
SS > Nc AW x YY % 


N KAY 


A\SS - ae Oe 
NS RRS 
\) Tans “Ye Sy . 

NY SOA I 

‘ we SES REEL ra AD 
RO TRESS, SENS A 
ASSES RE ANS RAN 
Aw  ~N : sy. SN \ eS \ SN 
WN ay ~~ eS \3 
Ay ASS ONS Yj 

ae SONS 


~ 
ez 


sh 
1] hd 


x 


EYP?) 
Oe LOU Laes! 
Ties 





- 


Ze 


Does your programming language 
present you with annoying ‘dead ends?" 


It may be time to discover the 
power of Revelation. 


When sophisticated program- 
mers first tried database program- 
ming languages they said “Too 
wimpy!” Now they’re discovering 
Revelation’s R/BASIC. Yes! It’s a 
Revelation! 


Let’s start by examining R/BASIC 
philosophically. 


First, it’s a structured lan- 
guage, interfacing smoothly with 
DOS as well as C and Assembler. 
You'll find commands for struc- 
tural coding like CASE, LOOP/ 
REPEAT with WHILE/UNTIL, 
IF/THEN/ELSE and other famil- 
iar friends here. And, like all seri- 
ous programming languages, it 
has a compiler for fast program 
execution. A compiler so fast that 
it can translate 20 lines per second 
for speedy error detection and 
correction. 


You should expect excellent 
string handling in a database 
programming language, but math 
is another story. Or is it? 


Because R/BASIC was 
developed as a database program- 
ming language, naturally you 
expect it to have powerful string 
handling capabilities. It does. 
Revelation’s R/ BASIC supports 
both dimensioned arrays and 
dynamic arrays. Individual strings 
can be up to 64K in length. But, 
what you might not expect ina 
database programming language 
is a high level of math support. 
Revelation has it. 

R/BASIC offers integral 8087 
support for maximum precision. It 
automatically accesses the 8087 
chip for calculations. And, if you 
don’t have an 8087 chip, R/BASIC 


incorporates an excellent 8087 
emulator. Trig functions? Of 
course. 


Subroutine flexibility. 


Revelation lets you declare 
your own internal or external sub- 
routines with argument passing. 
Subroutines can be developed in 
C and Assembler, then called 
directly from an application. And 
with Revelation’s recursive routine 
calling, you won't have to write as 
much code. 

How much less code? 

A long COBOL program typ- 
ically runs 20,000 lines. A long 
R/BASIC program typically runs 
300 lines. Imagine how much of 
your development time that kind 
of difference can save. 

R/BASIC will also help you 
produce a clean program fast. Its 
completely interactive symbolic 
debugger traces problems in min- 
utes instead of hours. 


Here’s another way you can save 
time with R/BASIC. 


By incorporating LOCK and 
UNLOCK statements in your pro- 
grams you can change from single 
to multi-user systems without 
making program modifications or 
recompiling. 


Is it time for your personal 
Revelation? 


Once you get used to some- 
thing, it’s difficult to change. But if 
change means progress, it’s worth 
the effort. R/BASIC is a powerful 
programming language that offers 
significant built-in database advan- 
tages over a “pure” programming 
language. These advantages 
can save time during program 
development and time when the 
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application runs. For the serious 
programmer, time is money. It’s 
worth your time to take a look at 
Revelation. 


The basics of R/BASIC. 


e Compiler. 

e Internal and external subrou- 
tine calling with argument 
passing. 

e Recursive routine calling. 

e Integral 8087 support for 
maximum precision. 

e Support for structured 
programming. 

e No data typing. 

e English variable names. 

e User-defined functions. 

@ Full screen editor. 

e Support for ASM and C 
routines. 

@ Sophisticated string handling 
includes dynamic array sup- 
port with a 64K limit. 

e Trig functions. 

e Alternate syntaxes. 

e Direct DOS interface. 

e Completely interactive 
debugger. 


If you would like to sample 
the power of Revelation, please 
send $24.95 for our comprehen- 
sive Demo/ Tutorial. A phone call 
gets you complete information. 


COSMOS 


Cosmos, Inc. 

3633 136th Place S.E. 

Bellevue, WA 98006, USA 
Phone (206) 643-9898 

Telex: 185210 (COSMOS MUT) 
FAX: (206) 643-7609 








Listing One (Text begins on page 30.) 


DIFP. 
VAX 


Name: 
=a Processor: 
Class: 
-- Creation Date: 
Revision: 

Author: 


1/8/87 


= Description: 


| MS-DOS 
C Program 


D. Krantz 


File compare and change-bar for text files. 


/* File Difference Utility */ 


#include <ctype.h> 
#include <stdio.h> 
#define OPT FLAG '/' 
#ifdef VAX11C 
#define MAXLINE 16 
#else 


#define MAXLINE 85 
#endif 


#define FORMFEED 'L'-'@! 
struct LINE { 


int linenum; 
int pagenum; 


/* 


/* 


command line option switch recognizer 


maximum characters in input line 


structure defining a line internally 
what line on page 
what page line is from 


struct LINE *link; 

char text[ MAXLINE ]; 

char dup[ MAXLINE ]; 
he 


typedef struct LINE *line ptr; 
typedef char *char ptr; 
typedef FILE *FILE PTR; 

Struct LINE root[ 3 j: 

FILE PTR msg; 


int line count[ 3 ] 
int page _count[ 3 ] 
int command_errors = 0; 

char xxl[ 132 ], xx2[ 132 ]; 
int files = 0; 

char ptr infile name[ 3 ] = 
char outfile name[ 132 ]; 
FILE: PTR infilet 37}; 

FILE *outfile; 

Static line ptr at[ 3 ] = { 


| 
on 


dy dy 1 We 


NULL, 


/* linked list pointer 
/* text of line 
/* uppercase copy of line text 


XXZ 


/* root of internal linked lists 
/* differences summary file pointer 


/* file's line counter 

/* file's page counter 

/* how many command line errors 
/* space to retain file names 


/* how many files specified on command line 
{ NULL, xxl, 


be 


/* changebarred output filename 


&(root[ 1 ]), 


/* input file pointers 
/* changebarred output file pointer 
&(root[{ 2 }) }; 


/* column where change bar is to appear 


lines to skip at top of page 
lines to skip at bottom of page 
length of a page 

is upper/lower case significant? 


is change-barred output file on? 
are blank lines significant? 
look ahead before giving up 
pages of first file to skip 
pages of second file to skip 


int debug = 0; /* trace switch 

int trace enabled = 0; /* keyboard tracing switch 
int bar_col = 78; 

int top skip = 0; he 

int bot_skip = 0; ‘ie 

int page len = 66; /* 

int up_case = 0; /* boolean, 

int re_ sync = 5; /* lines that must match for resynchronization 
int output = 0; /* boolean, 

int blanks = 0; /* boolean, 

int lookahead = 200; /* how many lines to 

int skipl = 0; /* how many 

int skip2 = 0; /* how many 

#if O /* tracing and other debug functions turned off */ 


#define trace( x ) 
#define ret 


#define ret _val( x ) 
#define TRACER FUNCTIONS 
#else 

66 


callstack( x ) 
{ callpop(); return; 
{ callpop(); return ( 


} 


x}? } 


at 


a 2 


at 


“7 


a 
a 


x] 
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#define trace( x } 


/** nothing **/ 


#define ret { return; } 
#define ret val( x ) { return( x ); } 
#endif 
/* sac ag sa seb ei ie ase sn ec n'a nn asc Sets ces Sc apa ve a ss ni sno cress sn cn es “me sai as os Sa cade amc emcee en a is es sa ak cs Sea 
ee sinc sees snus se nt ces in tan sess Sass is es as sn en nn esse eo as ced Ss sd Ss a vena oma ss ns ew ee eee eee a ees a as ss a ws x / 
main( argc, argv ) 
int argc; 
char *argv[]; 
{ 
int. 17 
trace( "main" ); 
if( arge == 1 ) 
help (); 
msg = stdout; 
for( i = 1; i < argc; itt ) 
strip opt( argv[{ i] ); 
if( files < 2 ) 
{ 
printf( "\nError: Must specify two files" ); 
exit ( 2 ); 
} 
open files(); 
if( command_errors ) 
exit ( 2 ); 
page_skip(); 
ditt () + 
ret; 
} 
/* eee ee ee ee ee ee ee ee ee ee ee eee 
DONT LOOK - Tells us whether or not this line should be considered for 
comparison or is a filler (e.g. header, blank) line. 
tee wnnte ahaa Raa eee eae ene ease nee x / 


dont_look( line ) 
line ptr line; 
{ 
int: 1; 
trace( "dont look" ); 
if( line == NULL ) 
ret_val( 0 ); 
if( line->linenum <= top_skip ) 
ret_val( 1); 
if( line->linenum > page len - bot_skip ) 
fet val( iy; 
if{ tpblanks ) 


for( 1 = 07; i < MAXLINE; i++ ) 
switch( line->text[ i ] ) 
{ 
case '\O': 
case ‘\n": 
ret_val( 1); 
case '\t': 
case ' ': 
break; 
default: 
ret _val( 0); 


} 


ret_val( 0 }; 


EQUAL - tells us if the pointers ‘a' and 'b' point to line buffers containing 
equivalent text or not. 


equal( a, b ) 
j line ptr a, b; 
{ 
trace( "equal" ); 
if( (a == NULL) || (b == NULL) ) 
ret_val( 0 j}; 
if( up case ) 
7 ret_val( !stremp ( a->dup, b->dup )} ) 


else 


ret_val ( 'stremp( a->text, b->text ) ) 





(continued on next page) 
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SEIDL 
VERSION 
MANAGER 


RECONSTRUCT any 
VERSION of a SOFTWARE 
product AUTOMATICALLY. 


*% Archive Database 


tracks all source code revisions 
as well as annotative comments. 


*% Audit Trail Report 


provides user specified — in- 
formation on any aspect of a 
project’s development. 


* Revision Branching 
allows any number of revisions 
to be created from an existing 
revision. 

* Text Compression 


optionally reduces disk storage 
requirements. 


* Menu Driven Shell 


makes SVM easy to use. 
*% Price: $299.95 + $5.00 p&h. 


SEIDL 


MAKE 
UTILITY 


NOT just ANOTHER COPY 
of the UNIX MAKE. 


* Structured Language to 
describe dependencies in a clear, 
concise and portable manner. 


* Rich Command Set 


includes parameterized macros, 
variables, if-then-else, iteration, 
wild cards, macro _ libraries, 
interactive statements, environ- 
ment access and much more! 


* Intelligent Analysis 


algorithm handles nested include 
files, library dependencies, and 
performs consistency tests to 
detect errors that other makes 
would blindly ignore. 


*% Price: $99.95 + $3.50 p&h. 


CALL TODAY 
1-313-662-8086 


Visa/MC/COD Accepted 
Dealer Inquiries Invited 


SEIDL COMPUTER ENGINEERING 


3106 Hilltop Dr., Ann Arbor, MI 48103 
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WHAT'S THE DEE? 


Listing One (Listing continued, text begins on page 30.) 


POSITION - moves the input pointer for file 'f' such that the next line to 
be read will be 'where'. 


es a a a os ew a aan ae ee a es Sn em as ae es em a a os a ea ee oe oe ae ee Sain a ae ee ee er ee eee Ce eo x / 
position( f, where ) 
int -f; 
line ptr where; 
{ 
trace( "position" ); 
at{[ f ] = &root[ f }; 
while( at[{ f ]->link != where ) 
at[ f ] = at[ f£ ]->link; 
ret; 
} 
I ra cic ste ee eee ee lee te 
FIX - fixes the end-of-line sequence on a VAX to be just a newline instead of 
a carriage-return/newline. 
i Se a ee es Sa ee cs a i ea i a ew ese es a ee ee a ss se sm sms es ees es ee es es x/ 
char *fix( str ) 
char *str; 
{ 
char *strsave; 
trace( "fix" ); 
strsave = str; 
1f( str == NULL ) 
ret_val( NULL ) 
#ifdef VAX11C 
while( *str != '\0O' ) 
{ 
if( match({ str, “\r\n"') } 
{ 
*str = *\n"? 
{str + 1) = *\0%; 
} 
strt+t+; 
} 
#endif 
ret_val( strsave ); 
} 
/* a a a a ss a a ee a i es ee we ee ee i ee ee ee ee eee ee 
INDEX - returns a pointer to the first occurance of 'c' in the string pointed 
to by 'str', or NULL if 'str' does not contain 'c'. 
ae a a a we ee ee ee ee ee x/ 
char *index( str, c ) 
char *str, ¢; 
{ 
trace( “index" ); 
while( (*str != c) && *(strt++) ); 
if( *str == c ) 
Fer Vai ser ) 
ret_val( NULL ); 
} 
/* naan a a a a a ae 
NEXT LINE - allocates, links, and returns the next line from file 'f' if no 
lines are buffered, otherwise returns the next buffered line from file 'f' 
and updates the link pointer to the next buffered line. 
—--- x/ 


line ptr next _line( f ) 
int f£; 
{ 
char *malloc(); 
line ptr temp, place hold; 


trace( "next line" ); 
if( at[{ f J->link != NULL ) 


at{ f ] = at[ f ]->link; 
ret vVal{ at{ £] )3 
} 
else 
{ 
at{ f ]->link = (line ptr)malloc( sizeof( struct LINE ) ); 


if( at[ f ]->link == NULL ) 

{ 
printf( "\nOut of Memory" ); 
exit( 2 ); 
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“Let’s cheat, 





Database programmers, why waste your 
time hacking out code? 

Imagine how much faster and more profit- 
able youd be if you could whip up power- 
ful database applications without the 
time-consuming coding pains... 
Introducing Magic PC from Aker, your pro- 
fessional dream come true. It’s not 
another line-by-line syntax treadmill like 
any DBMS or 4GL. 

Finally you can program as quickly as you 
design, while you delegate all the mun- 
dane and redundant coding tasks to 
Magic PC. 


Program 10 times faster 


Develop ere: 
relational CO 
database lao 
APPLICATIONS || — oe, oeratin rrp, 

10 times fas- 
ter using a 
visual 











AKER Corp. 


[is oraer Entry Screen 
Ex 





T. 
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design- 
driven inter- 
face. Instead of writing mountains of “how 
to” procedural code, you quickly place your 
program design specs in Execution Tables 
and Magic PC's engine executes them auto- 
matically. Don't lose any more time editing 
and debugging programs by hand. 


Incredible Zoom power 


Magic PC's 
pheno- 
Quantity ¥ Price menal 


Order No: 999 Customer No: 99999 
Order Date: 99/99/99 Address 








Zoom 
power mag- 

ecm | ~ | EEE] ically co- 
Cave BGR [ear ret To executes 

, related 
programs 
through nested Zoom windows smoothly 
with auto data scrolling in all directions. 
While Zooming, query and transfer data 
across windows or even Zoom deeper. 











No more maintenance! 


Change your programs on the fly without 
any manual maintenance responsibility. 
Magic PC automatically updates your 
changes online since all the data describing 
your design (data dictionary, programs and 
menus) make up a single file, self- 
maintaining Integrated Library. 


Magic PC does it all 


Design your entire database application 
with only one comprehensive develop- 
ment system. Generate both online 
programs (screens, windows, 
menus), as well as batch pro- 
grams (reports, updates, 
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say you spent the night coding...” 


import/export, etc.) with full color and gra- 
phics. You no longer fall between the cracks 
dealing with separate and inconsistent 
programming utilities. 


Free LAN features 
Develop multi-user applications for 
local area networks with Magic PC's 
automatic support for file and 
record locking security. 


Quick prototyping 
Prototype a complete working application 
in just hours and get immediate customer 
feedback to finalize the design. It’s a true 
time-saver. 


Stand-alone runtime 
Distribute your applications and protect 
your design with a low cost runtime engine. 
It has the friendliest end-user visual inter- 
face you've ever seen with built-in, menu- 
driven and syntax-free data retrieval power. 


Jeff Duntemann, PC Tech Journal: 


" Magic PC is probably the best integrated 
database application generator that we 
have seen...very smooth system, and 
smoothness comes at a premium these 
days." Also recommended by PC Magazine, 
PC World, PC Week, Computer Language, 
Data Based Advisor and many more around 


the world. 
Try it for $19% 


If you develop database applications fora 
living, you can't afford not to try Magic PC for 
yourself right now. For $19.95 you'll get the 
Magic PC Tutorial software and documenta- 
tion for hands-on evaluation, complete with 
a step-by-step guide to develop an Order 
Entry sample application in just a few 


hours. 
MagicPC 3$69x $199 


No kidding! For a limited time only, save 
almost $500 off the $695 list price, and get 
the complete unprotected Magic PC soft- 
ware for only $199 at our special introduc- 
tory non-resale price. 


Money back guarantee 


Even at $199 you can't go wrong with our no- 
risk guarantee: keep it only if it makes 

magic for you, or we'll buy it back 
within 30 days less $19.95 
restocking fee. 





System Requirements: 
IBM PC, XT, AT, PS/2 
and 100% compatible, 
PC-DOS 2.0 or later, 
512K, hard disk. All 
trademarks 
acknowledged. 


MAGIC PC 
by 
Ene 





WHAT'S THE DIFF? 


Listing One (Listing continued, text begins on page 30.) 


place hold = at[ f ]; 
at{ f ] = at[ f ]->link; 
at[ £ ]->link = NULL; 
if( fix( fgets( at[ f ]->text, MAXLINE, infile[ f ] ) 
{ 
free( at[{ f£ ] ); 
at[ f ] = place_hold; 
at[{ f£ ])->link = NULL; 
ret_val( NULL ) 
} 
#ifdef EMBEDDED FORMFEEDS 
i1f( (index( at[ f ]->text, FORMFEED ) != NULL) | | 
(line _count[{ f ] > page len ) ) 
#else 
if( ( *(at[ £ ]->text) == FORMFEED) | | 
(line _ count[{ f ] > page len ) ) 
#endif 


page count[ f 
line count[ f 

} 

at[{ f ]->linenum line count [ 

at{ £ ]->pagenum page count [ 

if( up_case ) 


{ 


++; 


£ 
£ dg 
strcepy( at[ f ]->dup, at[ f ]->text ); 
upper( at[ f ]->dup ); 


} 
ret val{*at[ £.] )3 


DISCARD - deallocates all buffered lines from the root up to and including 
‘to' for file 'f'. 





FORTRAN PROGRAMMERS 


Looking for the right PC FORTRAN language system? If you’re serious 
about your FORTRAN programming then you should be using F77L - 
LAHEY FORTRAN. 


“Lahey’s F77L FORTRAN is the compiler of choice. It’s definitely a 
“Programmers FORTRAN,’ with features to aid both the casual and the 
professional programmer... F77L compiled the five files in a total of 12 
minutes, which was 4 times as fast as MS FORTRAN and an astounding 6 
times as fast as Pro FORTRAN” - PC Magazine 


Compare the features and performance of other PC FORTRANSs with F77L 
and you will find that F77L is clearly the superior product. 


e Full Fortran 77 Standard (F77Lis not a subset)® Fast Compile - Increases productivity 

e Popular Extensions for easy porting of mini ® Source On Line Debugger (Advanced 
and mainframe applications features without recompiling) 
COMPLEX« 16, LOGICAL«#1 and INTEGER« 2 Arrays and Commons greater than 64K 
e Recursion - allocates local variables on Clear and Precise English Diagnostics 


the stack ¢ Compatibility with Popular 3rd Party 
e EEE - Standard Floating Point Software (i.e. Lattice C) 
e Long variable names - 31 characters e Easy to use manual 
e IMPLICIT NONE e Technical Support from LCS 


© NEW FEATURE - NAMELIST 


F77L - THE PROGRAMMER’S FORTRAN 


$477.00 U.S. 
System Requirements: MS-DOS or PC-DOS, 256K, math coprocessor (8087/80287) 


FOR MORE INFORMATION: _ 1-800-548-4778 








Lahey Computer Systems, Inc. International Dealers: 
P.O.Box 6091 England: Grey Matter Ltd., Tel: (0364) 53499 . . 
USA . Australia: Computer Transitions, Tel: (03) 537-2786 a a Magazine 


(702) 831-2500 Japan: Microsoftware, Inc., Tel: (03) 813-8222 


SERVING THE FORTRAN COMMUNITY SINCE 1967 


MS-DOS & MS FORTRAN are trademarks of Microsoft Corporation.Pro FORTRAN refers to Professional FORTRAN a trademark of 
Internationa! Business Machines. 
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discard( f, to ) 
int f> 
line ptr to; 

{ 
line ptr temp; 


trace( "discard" ); 
for (77) 
{ 
if( root[{ f ].link == NULL ) 
break; 
temp = root[ f ].link; 
root{ f£ ].link = root[ f ].link->link; 
free({ temp ); 
if( temp == to ) 
break; 


&roct[ £ }¢ 


vfputs( str, file ) 
char *str: 
FILE *file; 


int. > 
trace( "vfputs" ); 
#ifdef VAX11C 
for( i = 0; i < MAXLINE; i++ ) 
{ 
1f( str{ i] == '\n' ) 
{ 
strepy( str + i, “\r\n" )}?; 
break; 
} 
} 
fputs( str, file ); 


UNIX-LIKE TOOLS 


Lock into the POWER of UNIX with 
CCtools, THE Programmer’s Toolkit 
CCtools contains various UNIX-look-a-like utilities and 
text processing commands useful in any programmer’s 
toolbox. Some of these programmer productivity tools 
are fgrep, head, tail, qpr, cat, wc, more, od, getopt, 
line, od, page, path, touch, cp, uniq, true, false, expr, 

tee, and others. 


All programs within CCtools come with complete 
documentation and can be run from the normal 
system prompt. For instance, via command.com on 
an MSDOS machine. CCtools is a must for the 
serious programmer. 


CCtools is currently available on various machines 
for UNIX, MSDOS, and other non-UNIX environments 
at the introductory price of only $24.95! We can be 
reached at 718-849-2355 if you have any questions. 


We offer a FREE hotline, and a 30-day unconditional 
refund policy. We will never sell a copy-protected disk. 
No shipping, handling or hidden costs. 


Comeau 
Computing 


91-34 120th Street 
Richmond Hill, NY 11418 


Member of the Programmer’s Co-op 
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(continued on page 74) 


MAMMOTH PROJECTS OFTEN FAIL 
WITHOUT THE RIGHT TOOLS. 


Create interactive demos, tutorials 
and application prototypes with 
COBOL spll’s dialogue facility. 


COBOL spll’s powerful panel 
painter automatically sets 
attributes, generates automatic 
borders and lets you move or 
copy blocks of the panel within 
or across panels. 


Practically all of your field 
editing can be done with COBOL 
spll. Perform range and discrete 
value checking as well as binary 
value checking. 


30 Day Money Back Guarantee! 








WITHOUT THE PROPER TOOLS, 
ANY COBOL APPLICATION 
CAN BE A MAMMOTH PROJECT. 


Generate native COBOL 
screen handling source 
code for your application. 


Or, use COBOL spll’s 
powerful runtime facility. 


With COBOL spill, you 
make the choice! 
We don’t make it for you. 


Only $345.00! After August 31, 
1987 the normal retail price of 
$395.00 will go into effect. 


Give us a call and we’ll send you 
our free demo. We think you'll 
be impressed with the power and 
flexibility of COBOL spill. 


COBOL spill supports RM COBOL, 
Realia COBOL, Microsoft COBOL 
and RM COBOL 8x. 


COBOL spll... THE MISSING 
LINK TO COBOL PRODUCTIVITY! 


Flexus International Corporation 
P.O. Box 9119 

Morristown, NJ 07869 

(201) 895-4724 
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A POWERFUL UTILITY 


For under $20, get a powerful programmer’s utility that 
will bring you a year of: 





¢ hot technical tips from experts like Tom Swan, Ray Duncan, Michael Abrash, 
William Hunt and Rex Jaeschke. 


¢ guidance for consultants from Paul Barkley— industry news from Frank Greco 
and Hal (DTACK Grounded) Hardenbergh. 


¢ valuable and efficient code in ASM, C, Pascal, BASIC 
¢ expert tips on operating systems, the 386, graphics drivers, the EGA, and more! 


RESPECTED BY 


PROFESSIONALS 






“For hot programming tips look to... 
the excellent but relatively little known 
Programmer’s Journal.” 

Peter Norton —I/nside the IBM PC 
“Stuffed with useful information, 

it definitely deserves a look.” 

Ray Duncan—DD/J 6-86 


“T really love this magazine!” 
Harry Miller —Editor, PC WORLD 





ANUARVFEBRUApy js 
VOLUME § 7 
$3.95 






GET ONE 


FREE! 


To see what PJ has to offer 

just do one of the following: ADO 

¢ call us at (503) 484-2162 S 

¢ return the coupon at right C O 

We'll send you a FREE sample M KF 





elsewhere $39.95. 
4712 


copy of our latest issue, reserve Th 
ae € 
a 1 year subscription (6 issues Pro te DOS— 
in all) and invoice you for in the poe 
$19.95. If PJ is not the utility by Frank F Otected Mode 
you need, simply write . D. Greco 
“CANCEL” on the bill and 
Femum At. Keep your free issue Michae] Abrash Bf YES— Please send me a FREE sample issue of PJ 
and owe nothing. inside The EGA Band start my NO RISK subscription. 
Programmer’s Journal Tom Swan B Name 
P. O. Box 30160 OW Many 
° 2 : Oles : 
Eugene, OR 97403 ‘0 Fill an IBM Peo 8S it Take [| Company 
Bern a 
Please allow 4-6 weeks for deli f ~* Hard Robj 
first issue. Offer good in US. he IDS on Formaitson— Pd — 
Foreign subscriptions must be prepaid B SIC Data fing 
in U.S. funds. Can/Mex $29.95, z City State Zip 
u 
iE 
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WINDOWS FOR DATA” 





The first choice 





of professional 





programmers 





“Windows for Data is the best 
programming tool I’ve ever used. 
It’s the most flexible I’ve seen. 
Whenever I’ve wanted to do something, 
I’ve been able to find a way” 


Professionals choose our tools because 
they are designed, crafted, and supported 
for professionals. Here at Vermont Creative 
Software, we understand that performance 
and pleasure in programming derive 
from more than a long list of functions. 
Windows for Data provides: 


PROFESSIONAL FLEXIBILITY: 
Our customers repeatedly tell us how 
they've used WFD in ways we never imagin- 
ed - but which we anticipated by designing 
WED for unprecedented adaptability. Vir- 
tually every capability and feature can be 
modified to meet special needs. You will be 
amazed at what you can do with WFD. 


PROFESSIONAL PERFORMANCE: 
Screen output is crisp and fast. Windows, 
menus, and data-entry forms snap up and 
down from the screen. WFD is built upon 
and includes Windows for C, the win- 
dowing system rated #1 in speed and 
overall quality in PC Tech Journal (William 
Hunt, July 1985). 


PROFESSIONAL RELIABILITY: 
An unreliable tool is worse than no tool at 
all. VCS products are known in the industry 
for their exceptional reliability. Ask anyone 
who owns one. 


PROFESSIONAL DOCUMENTA- 
TION: Over 600 pages of documentation 
provide step-by-step explanations for each 
major application, a reference page for each 
function, listings of functions alphabetical- 
ly and by usage, and a fully cross-referenced 








Steven Weiss, 
Stratford Systems 


index. Extensive tutorials and demonstra- 
tion programs assist learning. 


PROFESSIONAL TECHNICAL 
SUPPORT: The same expert program- 
mers that develop our products provide 
prompt. knowledgeable technical support. 


PROFESSIONAL PORTABILITY: 
High-performance versions of VCS 
products are available for XENIX, 
UNIX, and VMS, as well as DOS. No 
royalties on end-user applications. 


OUR CHALLENGE AND 
GUARANTEE 
If you have an application where no 
other tool can do the job, try Windows 


for Data. If it doesn't help you solve 
your problem, RETURN FOR A FULL 
REFUND. YOU MUST BE SATISFIED. 


Ask for FREE DEMO DISKETTE 





Vermont 
Creative 

Software 
21 Elm Ave. 


Richford. VT 05476 
Telex: 510-601-4160 VCSOFT 


Tel.: 802-848-7731 


Prices: PCDOS* $395: XENIX. VMS. UNI) 
*PCDOS specify C compiler. 








WINDOWS FOR DATA 


for DOS, UNIX, VMS .... 
The complete windowing data entry, menu, 
and help system that does the hard job 
others can't — we guarantee it! 


Pop-up data entry windows; field types for 
all C data type, plus decimals, dates, and 
times; auto conversion to and from strings 
for all field types; system and user supplied 
validation functions; range checking; re- 
quired, must-fill, and protected fields; free- 
form movement; multiple-choice field entry; 
scrollable sub-forms. Branch and nest win- 
dows, forms, and menus. 


Complete context-sentitive help system 
with pop-up windows and scrollable text. 


Pop-up, pull-down, scrollable, and Lotus- 
style menus. 












NEW FOR DEBUGGING: Exclusive 
VCS Error Traceback System auto- 
matically identifies the location and 
cause of program errors. Eliminates the 
need to code error checks on all function 
calls! VCS Memory Integrity Check- 
ing helps catch those hard-to-detect, 
memory-corruption errors. 


NEW FOR ERROR HANDLING: In- 
stall your own error handler to be called 
whenever a function detects an error. 


NEW FORM LAYOUT UTILITY sim- 


plifies form design. 
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RSE 


WHAT'S THE DIFF? 


Listing One (Listing continued, text begins on page 30.) 





#else 
fputs( str, file ); 
#endif 
ret; 
} 
/* ee ee a rerrcrre 


PUT - If change-barred output file is turned on, prints all lines from the 
root of file 1 up to and including 'line'. This is called only if a match 


exists for each significant line in file 2. 


wee ee ee ee x / 
put ( line ) 
line ptr line; 
{ 
line ptr temp; 
trace( "put" ); 
if( output ) 
for( temp = root{ 1 ].link; ; ) 
{ 
if( temp == NULL ) 
ret 
vfputs( temp->text, outfile ); 
if( temp == line ) 
Fret 
temp = temp->link; 
} 
ret; 
} 
/* eee ee ee ee ee eee ee ee = 
CHANGE BAR - inserts a change-bar into the text pointed to by 
'str' and returns a pointer to ‘'str'. 
— ee ee ner i i nn nn a a nasa ass x / 


char *change bar( str } 
char *str: 

{ 

: int 23 

char temp[ MAXLINE + 1 J], *dest,*base; 


trace( "change bar" ); 
base = str; 

dest = temp; 

i = 0; 

if{ Dar col t=0 ) 

{ 


for( i = 0: *str != '\n's i++ } 
{ 
if( (*str == '\r') && (*(str +1) != '\n') ) 
i = 0; 
e(ISStrt) = *(Strrt); 


} 

while( i++ < bar_col ) 
W(SCr) te =. * *F 

stropy( str, “i \n"}? 


else 
if{ str[ O ) j=" 714 
{ 
strcpy( temp, str ); 
strepy( str + 1, temp ); 
str[ 0] = '|'; 
} 


ret _val( base ); 


ADDED - Prints a change summary for all significant lines from the root of 
file 1 up to and including ‘line'. If output is enabled, adds a change bar 
to the text and outputs the line to the output file. 


added( iine } 
line ptr line; 


{ 


line ptr temp; 


trace( “added" ); 
for( temp = root[{ 1 ].link? ; ) 
{ 
if( temp == NULL ) 
ret 
if( !dont_look( temp ) ) 
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fprintf( msg, "+%d:%d -> %s", temp->pagenum, 


temp->linenum, temp->text ); 
if( output ) 
if( dont_look( temp ) ) 


vfputs( temp->text, outfile ); 
else 


vfputs( change bar( temp->text ),outfile ); 


if( temp == line ) 
ret 
temp = temp->link; 


DELETED - outputs a change summary for all lines in file 2 from the root up to 


and including ‘line'. 


deleted( line } 
line ptr line; 
{ 


line ptr temp; 


trace( "deleted" ); 
for( temp = root[ 2 ].link; ; ) 
{ 
if( temp == NULL ) 
ret 
if( !dont_look( temp ) ) 


fprintf( msg, "-%d:%d -> $s", temp->pagenum, 


temp->linenum, temp->text ); 
if( temp == line ) 
ret 
temp = temp->link; 


RESYNC - resynchronizes file 1 and file 2 after a difference is detected, and 
outputs changed lines and change summaries via added({) and deleted(). 

with the file inputs pointing at the next two lines that match, unless 
it is impossible to sync up again, in which case all lines in file 1 are 


printed via added(). Deallocates all lines printed by this function. 


resync( first, second )}) 
line ptr first, second; 


line ptr filel start, file2 start, last_badi, last_bad2, tl, o> 
int i, j,k, movedl, moved2; 


trace( "resync" )}; 


movedl = 0; 
fiiel start = firySst: 


position({ 1, first -}; 
for( k = 0; k < lookahead; k++ ) 
{ 


while( dont _look( filel_ start = next line( 1) ) }; 


if( filel start == NULL ) goto no_sy; 


moved2 = 0; 
file2 start = second; 


position( 2, second ); 
for( 3 = 0; j < lookahead ; jtt+ ) 
{ 


while( dont_look( file2_start = next_line( 2 ) 


if( file2 start == NULL ) goto eof2; 


ti = £ilel start; 
t2 = file2 start; 


for( i = 0; (i < re_sync) && equal( tl, tz} 


{ 


if( (cl == NULL) || (t2 == NULL) ) 
break; 
} 
if( i == re_sync ) goto synced; 


last _bad2 = file2_ start; 


(continued on next page) 
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while( dont _look( tl = next line ( 
while( dont look( t2 = next line ( 
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A Reconfigurable 
Programmer’s Editor 
With Source Code 


ME is a high quality programmer’s 
text editor written specifically for the 
IBM PC. It contains features only 
found in the more expensive pro- 
grammer’s text editors. These 
features include: 


¢ Multiple Windows 
e¢ Column cut and paste 
e Line marking for source code 
e Regular Expressions 
e C-like Macro Language 
e Reconfigurable Keyboard 
e Capture your DOS session 
e Run your compiler and examine 
errors 
e Comes with useful precompiled 
macros 

















































New commands and features may be 
added to the editor by writing pro- 
grams in its macro language. The 
language resembles C, much easier 
to write macros in than a LISP based 
language. The macro. language 
comes with a rich set of primitives for 
handling strings and changing the 
editor environment, plus most of the 
flow-of-control constructs that come 
in C (for, while, if, break, continue). 


The source code option lets you see 
how text editors are written. You will 
also learn how to write interpreters 
by examining the code to the macro 
language compiler and interpreter. 


The code is written in standard C, 
with several key library routines 
written in assembler for speed. The 
source code option is perfect for 
OEMs and VARs who want to add 
editing or word processing capabili- 
ties to their applications. 








Price for editor and on-line 
documentation — $39.95 
Price for editor with 
complete source— $94.95 
(Please add $2.00 for 


shipping and handling) 


Special offer—New York 
Word word processor— $29.95 
Multi-windowing, mail 
merge, hyphenation, math, 
regular expressions, TOC 
and index generators 


MAGMA 
SYSTEMS 


138-23 Hoover Ave., Jamaica, NY 11435 
(718) 793-5670 
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WHAT'S THE DIFF? 


Listing One (Listing continued, text begins on page 30.) 


position( 2, file2_ start ); 
while( dont_look( file2_ start = next line( 2) } ); 
moved2 ++; 


} 


eof2: 
last_badl = filel_ start; 
position( 1, filel_start }; 
while( dont_look( filel_start = next_line( 1) ) ); 
movedlt+t; 
} 
printf( "\n*** ERROR - lost sync in file %s at page %d line %d", 
infile name{ 1 ], first->pagenun, first->linenum }); 
fclose( outfile ); 
exit ( 2 ); 
no sy: 
position( 1,. first ); 
while( (first = next _line( 1 )) != NULL ) 
{ 
added( first ); 
discardt 2,.-first }:; 
} 
ret; 
synced: 


if( movedl ) 
{ 
added( last _badl ); 
discard( 1, last_badl ); 
} 
position({ 1, Tilel.start. }; 
if( moved2 ) 
{ 
deleted( last _bad2 }; 
discard( 2, last _bad2 ); 
} 
position(: 2, file2 start ); 
fprintf( msg, "\n" ); 
























ret; 

} 
Programming in Prolog The World of Programming Languages 
Third Edition M. Marcotty and H. Ledgard 
W.F. Clocksin and C.S. Mellish This new book is a comprehensive study of the principal 
The first book to examine Prolog as a practical programming features found in major programming languages. All concepts 
language is now in its third edition. Revisions include an account discussed are drawn from existing languages with specific 
of up-to-date programming techniques using accumulators and references made to Ada, Algol 60, Algol 68, Cobol, Fortran, 
difference structures, new information on syntax errors, and Pascal, and PL/1. 
operator precedences that are now compatible with the most 1987/360 pp/30 illus/Paper $29.95 
widely-used implementations. Programming in Prolog has ISBN 0-387-96440-1 
been further reorganized and the improvements in presentation (Springer Books on Professional Computing) 
are substantial. The best book on Prolog has gotten better and 
is still a must for anyone involved in logic programming today. Software Engineering inc 
1987/Approx 290 pp/7 illus/Paper $19.95 P Margolis and P Darnell 


ISBN 0-387-17539-3 Designed as a text for both beginner and intermediate-level 


programmers. The authors make few assumptions about the 


The Art of C Programming reader's prior computer experience, starting with a basic 
R. Jones and |. Stewart description of how source code is translated into its internal and 
A very clear and readable tutorial to the C programming executable form. Also includes C’s more advanced features 
language with several detailed applications illustrating important and documents the proposed ANSI Standard. 
aspects of the language. A major focus throughout the book is 1987/Approx 350 pp/50 illus/Paper 
to introduce the distinctive features and power of C along with (Springer Books on Professional Computing) 
its basic constructs and concepts. Hobbyists and students alike 
will find The Art of C Programming to be a solid Sig Sage SPE 
introduction to this versatile language. 
1987/186 pp/42 illus/Paper $18.50 To order these or other Springer-Verlag titles, send a check or 
ISBN 0-387-96392-8 money order (plus $2.50 for shipping) to: Springer-Verlag 
New York, Inc., Attn: G. Kiely S671, 175 Fifth 
, Avenue, New York, NY 10010 (NY. NU, and CA residents 
Springer-Verlag please add sales tax). To order by credit card, call TOLL 


New York Berlin Heidelberg London Paris Tokyo FREE 1-800-526-7254 (In NU, 201-348-4033). 
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DIFF - differencing executive. Prints and deallocates all lines up to where 


a difference is detected, at which point resync() is called. Exits on end 
of file 1. 


line ptr first, second; 


trace( "diff" ); 
for( 77 ) 
{ 
while( dont_look( first = next line( 1) ) ); 
if( first == NULL ) 7 
{ 
put first. }s 
ret; 
} 
while( dont _look( second = 
if( equal( first, second ) 


{ 


next _line( 2) ) );3 
) 


puc ( £ixrst }; 
discara( 1, first -}: 
discard( 2, second ); 
} 
else 
resync( first, second ); 
if( second == NULL ) 
ret 


PAGE SKIP - skips the first 'skipl' pages of file 1, and then the first 'skip2' 
pages of file 2. This is useful to jump over tables of contents, etc. 


page_skip() 
{ 


line ptr first, second; 


trace( "page skip" }; ‘ 
for ( ; ne — (continued on next page) 

















A COMPLETE MULTIUSER SOFTWARE 
ELOPMENT SYSTEM 


M Street ae 


SCRUTINY 
Advanced symbolic debugger. 


Multi-language: compatible with Turbo Pascal, 


50 
JH 
6 Su, 
Ye ” 


Loaded with Standard Features 
* 20 MB Hard Drive (100MB optional) »* 720K 3.5" Floppy 





°1 MB RAM (3MB optional) e Parallel Printer Port j 
rer eat : BF pea can a ae Microsoft Assembler, others. 
1 RS-232 Parts ( opaonal) eM ce) pile Reypoaa Multi-DOS: works with all MS-DOS/PC-DOS 





computers. 


Multi-level: debug at source level and machine level, 
separately or together. 


Multi-display: debug character-mode and graphics- 
mode programs, with movable debug windows. 


Multi-chip: support for 8086, 80186, 80286, 80386. 
Fast 80386 “memory breakpoints” (stop program 


Multitasking/Multiuser Unix-like Operating System 


4.3 BSD style C shell » Korn-like command editing 
Command and file completion * Aliases and History 
V/O redirections and pipes * Job Control + Electronic Mail 
Print Spooler » Automatic Job Scheduling » Real-time multitasking 
Time-Shared multitasking * Wildcard Filename expansion 


when specified variable is accessed or modified). 


Scrutiny/Master $99.95 
for debugging Turbo Pascal, Microsoft Assembler, 
and other languages. 


Scrutiny/Turbo Special price! $49.95 
for debugging Turbo Pascal only. 


Command scripts (batch files) with C-like syntax * On-Line Manual 







The BDT 5000 is a complete software development system. 


Unix-like host, and file-server. Fully multitasking. Sophisticated kemel with 
file and record locking, interprocess communication, and real-time scheduling. 
a rformance intelligent workstations, each with a 68000 CPU and 1MB 
of M are available. A complete Unix-like local development environment. 









VISA/MC AMEX accepted. In Texas please add sales 
tax. Outside of North America add $10 per item 


shipping. 


BDT 5000 Multitasking System Only $1,699.00 





Optional Components: 
68000 Intelligent Terminal $899.00 
VT100 Compatible Terminal $699.00 
Four RS232 Port Expansion with 5 User Upgrade $495.00 
$699.00 









M Street Software 
5400 E. Mockingbird Lane Suite 114 
Dallas, Texas 75206 
214-827-4908 


Information also available via our 24 hour 300/1200 
modem: 214-669-1882. 









2 MB Memory Expansion (3MB Total RAM) 


Other Options : Color Graphics, Additional RS232 Ports, Large capacity 
high speed hard disks, and tape drives. 
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EOE 


Listing One (Listing continued, text begins on page 30.) 


first = next linef 1 ); 


if( (first == NULL) || (first->pagenum > skipl) ) 


break; 
putt Filyst );7 
discard( i, £1rst: )? 
} 
if( first != NULL ) 
position( l, 
For( 3 7) 
{ 


first: *)s 


second = next line( 2 ); 


if( (second == NULL) 
break; 
discard( 2, second ); 


if( second != NULL ) 
position( 2, 


Drinci ( *\ADIFE” 77 


printf( "\nText File Differencer 
OLIneELEt *\n" 2 

printf( "\nFormat:" ); 

printf( "\nDIFF [option{option}] 
printi( *\n" }; 

printt( *“\n newfile = 

printt ( 





\ 
aad qyuntt cane! 





With Vitamin C, your applications come 
alive with windows that explode into view! 
Data entry windows and menus become a 
snap. Vitamin C’s open ended design is 
full of ‘“hooks’’so you can “‘plug in’ spe- 
cial handlers to customize most routines. 
Of course, Vitamin C includes all source 
code FREE, with no hidden charges. /f 


always has. 





Create windows with one easy function. 
Vitamin C automatically takes care of com- 
plicated tasks like saving and restoring the 
area under a window. 

Options include titles, borders, colors, 
pop-up, pull-down, zoom-in, scroll bars, 
sizes to 32k, and more. Unique built-in 
feature lets users move and resize windows 
at run-time! 





Flexible dBase-like data entry and display 
routines feature protected, invisible, re- 
quired, and scrolling fields, picture clause 
formatting, full color/attribute control, selec- 
tion sets, single field and full screen input, 
and unlimited validation via standard and 
user definable routines. 


second ); 


(second->pagenum > skip2) )} 


and Change Barrer" }); 


newfile oldfile [barfile]" ); 


latest revision of text file" ); 
ake 5 oldfile = baseline to compare against" ); 





VITAMIN 


It’s good for your system! 


___ High Level Functions _ 





Standard help handler provides context 
sensitive pop-up help messages any time the 
program awaits key strokes. So easy to use 
that a single function initializes and services 
requests by opening a window, locating, for- 
matting, displaying and paging through the 
message. 

Multi-level MacIntosh & Lotus style 
menus make user interfaces and front ends 
a snap. Menus can call other menus, func- 
tions, even data entry screens quickly and 
easily. 

Text editor windows can be opened for 
pop-up note pads and general purpose 
editing. Features include insert, delete, word 
wrap, justify, cut, paste, search, and more! 





With VCScreen and Vitamin C working 
together, you'll reach a new level or produc- 
tivity you can’t reach with a function library 
alone! 

VCScreen speeds development even more! 
The interactive screen editor actually lets you 
draw input, output and constant fields, 
headings, boxes, lines, even a window for 
your froms to run in. 

VCScreen generates readable C source 
code ready to “’plug in’’ to your application 
and link with Vitamin C. 








: Guarantee - 


Better than a brochure. More than a demo 
disk. If you’re not satisfied, simply return the 
package within 30 days and receive a full 
refund of the purchase price. 

Vitamin C...............04. $225.00 

Includes ready to use libraries, tutorial, 
reference manual, demo, sample and 
example programs, and quick reference 
card; for IBM PC and compatibles. Specify 
compiler and version when ordering. 
Vitamin C Source... 2.2 sd ede we FREE” 

*Free with purchase of Vitamin C. 


VCSCreen « s<c40e4 050444465 ed $99.95 
Requires Vitamin C and IBM PC/XT/AT or true 
compatible. 

Shipping $3 ground, $6 2-day air, $20 over- 
night, $30 overseas. Visa and Master Card 
accepted. All funds must be U.S. dollars 
drawn on U.S. bank. Texas residents add 
74% sales tax. 


(214) 416-6447 


creative 


Creative Programming Consultants, Inc. 
Box 112097 Carrollton, Texas 75011 
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printf( "\n barfile = output file if changebars are desired" ); 
printf ( “\n"™ 33 
printr( “\nCptions:”.)s 
#ifdef TRACER FUNCTIONS 
printf ( “\n /TRACE Makes a mess of the display and runs real 
slow" ); 


printf( "\n default = trace off" ); 
DEINEEC “A\n® 32 


#endif 
printr( “\n /BAR_COL=n Column of output file in which change bar 
will appear" ); 
Prints’ (¢ “\n default = 78" ); 
printr( “\n" > 
prince ( \n /TOP_SKIP=n Lines at top of page to skip for running 
heads & page nos." ); 
princst (."\n default = 0" ); 
printr¢ “\n" ys 
print£{ *\n /BOT_SKIP=n Lines at botom of page to skip for running 
foots and page nos." ); 
Orinct( “\n default = 0" ); 
OFintE( “\n" }¢ 
printf( "\n /PAGE LEN=n Lines per page (embedded formfeeds over- 
ride)" ); 
prince t "\n default = 66" ); 
printrt?, “\n" }> 
printt( “\n /UP_CASE Upper/Lower case is significant/is not 
Significant" ); 
Dbrinct{ *\o /NOUP_CASE default" ); 
DYLnEE tT "\n" fs 
prince te "\n /RE_SYNC=n Lines that must match before files are 
considered synced" ); 
printf( "\n after differences are found - default = 5" }); 
printi¢ "\n*? 73 
printf( "\n /OUTPUT=file File to redirect differences summary to. " ); 
printer ( “\nA default = SYSSOUTPUT or console." ); 
printr, “\n" )¢ 
princr € “\n / BLANKS Blank lines are considered significant" ); (continued on page 81) 


Now with 
aBx 
EXPRESS 


C-PROGRANMIMERS. 


File System Utility Libraries 


All products are written entirely in K&R C. Source 
code included, No Royalties, Powerful & Portable. 


; 75.90 


*® High speed random and sequential access. 
© Muitiple keys per data file with up to 16 million records per file. 
* Duplicate keys, variable length data records. 


the dBx” Translator 40.00 








C from dBASE IL III, II+ programs ® Greatly speeds application development. 
aed . © Combines ease of use of database manager with flexibility of program- 
Move to UNIX, XENIX, ONX, MAC, AMIGA ming language. .. 
. ® Supports multi key files and dynamic index definition. 

Faster, more reliable IBM PC programs © Very easy to use. 
Supports multi-user and network Make ES) O© 
Run your code on any standard C system Paine er pesniicuhy, ) 
Know dBASE? Learn C easily. . ® Works for programs written in every language. 
Priced f 50: dablet AiceaGul ® Full macros, File name expansion and built in rules. 

riced from $350; available . i pointe Full Documentation and Example Programs Included. 
Includes full screen handler library 00 
Supports a choice of C database managers ALL THREE PRODUCTS FOR — 149. _ 

. For more information call or write: | 1343 Sisabury Drive 
from ZY Desktop Ai Oakville, Ontario, Canada 
L6L 255 





(416) 825-0903 


1720 Post Road East, Westport, CT 06880 | y, | = 
Telephone: 203-255-3400 ° Telex: 6502972226MCI Credit cards accepted. Dealer inquiries invited. 
MCIMAIL-DESKTOPAI 

dBASE Ie a trademark of Ashton-Tate dBx Is a trademark of Desktop Al CIRCLE 259 ON READER SERVICE CARD 
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YOUR SYSTEM'S: 
KEY COMPONENT 


The Only Magazine By And For 
Advanced Micro Users. 


At last there is a magazine that brings you the strictly 
technical but practical information you need to stay 
up-to-date with the ever changing microcomputer 
technology .. . Micro/Systems Journal. Micro/Systems 
Journal is written with the needs of the systems 
integrator in mind—the individual who’s involved in 
putting together the hardware and software pieces of 
the microcomputer puzzle. 


In each issue of Micro/Systems Journal you'll find 
such useful and progressive articles as: 


¢ Interfacing to Microsoft Windows 
e Unix on the PC 


¢ 80386 Programming 
¢ High Resolution PC Graphics 


¢ Using 80286 Protected Mode 
e Multiprocessing and Multitasking 


You'll get the hands-on, nuts and bolts information, 
insight and techniques that Micro/Systems Journal is 
- famous for . . . in-depth tutorials, reviews, hints . . . the 
~—— een latest information on computer integration, networks 
etw and multi-tasking, languages, and operating systems . . . 
hard-hitting reviews. 

To start your subscription to Micro/Systems 
Journal, simply fill out one of the attached cards or 
write to Micro/Systems Journal, 501 Galveston Dr., 
Redwood City, CA 94063. You'll receive a full year (6 
issues ) of Micro/Systems Journal for just $20, and 
enjoy the convenience of having M/SJ delivered to your 
doorstep each month. Don’t wait .. . subscribe today! 
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__ WHAT'S THE DIF? 


Listing One (Listing continued, text begins on page 30. ) 





default" ); 


printf’ ( “\n /NOBLANKS 
printf, “\n" j}3 
princtr( "\n /LOOKAHEAD=n Lines to look ahead in each fil 


e to resync 


after difference" ); 


Drintrt ¢ -"\n 
prince ( "\n" \s 
princLe( “\n /SKIP1=n 


default = 200" ); 


Pages in NEWFILE to skip before 


compare. 


Also sets /SKIP2" ); 


Drinttt *\n 
prince, “\n* +: 
prints ( ?\n /SKIP2=n 


default = 0" ); 


Pages in OLDFILE to skip before 

Must be after /S 
princi { “\n default = 0" }; 
printf, “\n" )}> 


open files () 
{ 


int is 


trace( “open files" ); 
for( i = 1; i < 3; i++ ) 
if( (infile[ i ] = fopen( infile name[ i ], 


{ 


“r'*) } 


compare. 


RIPA™ -} 7 


== NULL ) 


printf( "\nError: Can't open %s", infile name[ i ]); 


command errors+t+; 
} 
if( files > 2 ) 


if( (outfile = fopen( outfile name, "w" )}) == NULL ) 


{ 


printf ( “\nError: Can't create %s", outfile name ); 


command errors++; 


ret; 


redirect ( str ) 
char *str: 
{ 


char filename[ 132 ], *ptr, *dest; 


trace( "redirect" ); 
dest = filename; 
if( (ptr = index( str, '=' ) + 1) == (char *) (NULL + 1) ) 
{ 
printf( “\nERROR in option %s", str ):; 
command errors++; 


} 


while( (*ptr != OPT FLAG) && ((*(destt++) = *(ptr++)) != '\ 
*dest = '\O'; 
if( (msg = fopen( filename, "w" )) == NULL ) 


{ 
printf( "\nERROR creating %s", filename ); 
command _errorst++; 


strip opt ( str ) 
char *str; 

{ 
trace(. "Steip opt” )7 
upper( str ); 
if( str[.0 ] == OPT FLAG ) 
{ 

itt march( str +1, “BAR COL” ) ) 
bar col = num( str ); 

else 1f( match( str + 1, “TOP _SKIP™ ) ) 
top skip = num( str }; 

else if{ mateh( str + 1, “BOT SKIP".) ) 
bot skip = num( str ); 


(continued on 
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SQL Compatible Query System adaptable to any 
operating environment. 


CQL Query System. A subset of the Structured 
English Query Language (SEQUEL, or SQL) 
developed by IBM. Linked files, stored views, 
and nested queries result in a complete query 
capability. File system interaction isolated in an 
interface module. Extensive documentation 
guides user development of interfaces to other 
record oriented file handlers. 


Portable Application Support System 


Portable Windowing System. Hardware 
independent windowing system with borders, 
attributes, horizontal and vertical scrolling. 
User can construct interface file for any 
hardware. Interfaces provided for PC/XT/AT 
(screen memory interface and BIOS only 
interface), MS-DOS generic (using ANSI.SYS), 
Xenix (both with and without using the curses 
interface), and C-library (no attributes). 


Screen 1/0, Report, and Form Generation 
Systems. Field level interface between 
application programs, the Query System, and 
the file system. Complete input/output 
formatting and control, automatic scrolling on 
screens and automatic pagination on forms, 
process intervention points. Seven field types: 
8-bit unsigned binary, 16 bit signed binary, 16 
bit unsigned binary, 32 bit signed binary, 
monetary (based on 32 bit binary), string, and 
date. 


Including Source Code 
$395.00 


File System interfaces include 
C-tree and BIRIEVE. 


HARDWARE AND FILE SYSTEM 
INDEPENDENT 





URTZBERG 


GompuTER Systems 


41-19 BELL BLVD. 
BAYSIDE, N.Y. 11361 


VISA/Master Charge accepted 


(703) 435-0413 


*C-tree is a trademark of FairCom 


IBM, SEQUEL, PC, XT, AT are trademarks of IBM Corp. 
MS-DOS and Xenix are trademarks of Microsoft Corp. 


CQL and the CQL Logo are trademarks of Kurtzberg Computer 
Systems. 
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PROMPT DELIVERY!!! 


SAME DAY SHIPPING (USUALLY) 
QUANTITY ONE PRICES SHOWN for JUNE 21, 1987 


ICs; 


OUTSIDE OKLAHOMA: NO SALES TAX 


DYNAMIC RAM 
*TC511002P-12 
*256Kx1 100 ns 
256Kx4 120 ns 
1000Kx1 100 ns 
64Kx4 150 ns 
256Kx1 80ns 
256Kx1 100 ns 
256Kx1 120 ns 
256Kx1 150 ns 
EPROM 
64Kx8 200 ns 
32Kx8 250 ns 
32Kx8 250 ns 
16Kx8 250 ns 
STATIC RAM 
62256 32Kx8 120nSs 
6264LP-15 s8kxs 150ns 


OPEN 61/2 DAYS, 7:30 am-10 pm: SHIP VIA FED-EX ON SAT. 
SAT DELIVERY | MasterCard/VISA or UPS CASH COD 
INCLUDED ON | Factory New, Prime Parts Poo 
Recevepey. | MICROPROCESSORS UNLIMITED, ING. 
BEGGS, OK. 74421 _ (918) 267-4961 


Th: StdAir = $4/1 Ib 
No minimum order. Please note that prices are subject to 


1Mbit 
51258 
1Mbit 
1Mbit 
4464 

41256 
41256 
41256 
41256 


27512 
27C256 
27256 
27128 


$27.50 
6.95 
32.00 
27.50 
3.50 
5.35 
4.40 
3.45 
3.20 


$9.95 


80287-8 80387-16 
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IBM PC/XT, Compaq Portable & Plus; hp Vectra 


160.00 $250.00. $575.00 


8087-2 
$ 


Fr: P-1 $10.50/2 Ibs 


change. Shipping & insurance extra, & up to $1 for packing materials. Orders received by 
9 PM CST can usually be delivered the next morning, via Federal Express Standard 
Air (« $4.00, or guaranteed next day Priority One (@ $10.50! All parts guaranteed 
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VERSION CONTROL SYSTEM 


TLIB™ keeps ALL versions of your program in ONE 
compact library file, even with hundreds of revisions! 


e Fastest, most powerful version control system you can 
buy. Nothing else comes close! TLIB updates libraries 
faster than some text editors can load and save files. 


e LAN-compatible! Shared libraries with PC Net, Novell, 
etc. Check-in/out locking for multi-programmer projects. 


e Synchronized control of multiple related source files. 
e Easy to use. Menu or DOS command line parmeters. 


e Frugal with disk space. Libraries are more compact than 
with most other version control systems. And TLIB 
uses no temporary files, so you can maintain a 300K 
library on one 360K diskette, with room to spare, even 
with TLIB itself on the same disk. 


e Free copy of Landon Dyer’s excellent public domain MAKE 
utility (EXE, plus source code for DOS & VAX/VMS). 


e Plus: File compare utility. Virtually unlimited source file 
size. Date, comments with each version. Configurable 
user interface, and many configurable options, like: read- 
only libraries; automatic tab/blank conversion; insertion 
of revision history comment block in the source file. 


PC/MS-DOS 2.x & 3.x Just $99.95 + $3 s/h Visa/MC 


BURTON SYSTEMS SOFTWARE 
P.O. Box 4156, Cary, NC 27511-4156 


(919) 469-3068 
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function libraries 
disassemblers 

compilers 

text editors 

text filters 
cabratinwcancrd support 
text formatters 
interpreters 


bulletin boards 


Users’ Group 
Library 


A Directory 
of Public Domain 
C Source Code 


co-routines 
compiler compilers 
window packages 
assemblers 

games 

tutorials 

math packages 
link editors 
languages 

cross compilers 


pre-processors 


function libraries 


disassemblers 
compilers 


text editors 
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WHAT'S THE DIFF? 


Listing One (Listing continued, text begins on page 30. ) 





else if( match( str + 1, "PAGE LEN" ) } 
page _ len = num( str ); 

else if( match( str + 1, "UP_CASE"™ } } 
up case = 1? 

else if ( match( str +1, 
up case = 0; 

else if( match( str + 1, "RE SYNC" ) ) 
re sync = num( str }; 


"NOUP_CASE" ) ) 


else if( match( str + 1, “BLANKS" ) ) 
blanks = 1; 

else if ( match( str + 1, “NOBLANKS" ) ) 
blanks = 0; 


else if( match( str + 1, "LOOKAHEAD" )} }) 
lookahead = num( str }; 


else if( match( str + 1, "SKIP1" ) ) 
skipl = skip2 = num( str ); 
else if( match( str + 1, “SKIP2" ) ) 
skip2 = num( str ); 
#ifdef TRACER FUNCTIONS 
else if ( match( str + 1, “TRACE" ) } 
trace enabled = debug = 1; 


#fendif 
: else if( match( str + 1, “OUTPUT" )} ) 
redirect( str }; 
else 
{ 
printf( "\nUnrecognized Option: %s", str );7 
command _errorstt; 
} 
} 
else 
{ 
switch( files ) 
{ 
case OQ: 
strepy( infile name[ 1 ], str ); 
break; 
case 1: 
strcpy( infile name[ 2 ], str ); 
break; 
case 2: 
strcpy (-outfile name, str ); 
output = 1; 
break; 
default: 
printf( "\nError: Toomany files at $s",str); 
command errors++; 
break; 
} 
files++; 
} 
if( index( str + 1, OPT FLAG }) != NULL ) 
strip opt( index( str + 1, OPT FLAG ) ); 
ret; 
} 
/* a a eae a a a a a a ee ee ey 
UPPER - converts the string 'str' to upper case. 
nnn nnn nr nn rn nr nr nr rrr rn rn a eee ee x/ 
upper( str ) 
char *str; 
{ 
trace( “upper" ); 
for( ; 7 ) 
{ 
if( *str == '\0O' ) 
ret 
*str = toupper( *str ); 
str++; 
} 
f Ri SS SS eee a ee eee een eden 
MATCH - looks for a match of 'str' with the first (strlen( str) ) characters 
of ‘pattern’. Returns O for no match, nonzero on match. 
—------------------—-- - -- - -- - -- - - + - * / 
int match( str, pattern ) 
char *str, *pattern; 
| 
trace( "match" }; 
a nas (continued on page 84) 
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The Clear Choice for Large Programming Projects. 









386 


C an Pascal 
for MS-DOS 





MetaWare Incorporated announces the first 
available C and Pascal compilers that generate 


protected-mode 80386 code 


for running on any 80386 machine that runs MS-DOS (eg., the 
Compaq Deskpro 386 or the IBM Personal System/2 Model 80). 
The compilers are functionally identical to our well-respected 
8086/286 MS-DOS High C'™ and Professional Pascal ™ com- 
pilers, but now you can get them generating 80386 code. 


Theres no reason to wait! Industry leaders such as ANSA and 
Fox Software are already converting their 16-bit database products 
to 32-bit protected mode, getting increases in speed and function- 
ality. Dont wait years for.Microsoft’s 386DOS — your competition 
will have a big jump on you! 

Expand your application to the large 32-bit address space and 
the full 32-bit registers of the 80386. Contact MetaWare for your 
80386 software solution today! 
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WHAT'S THE DIFF? 


Listing One (Listing continued, text begins on page 30.) 


if( *str != *pattern } 
ret _val( 0 ) 

strt+t+; 

patternt+t; 

if( *pattern == '\O' ) 


if( *str 


NUM - returns the integer associated with a command line option. An equal 
sign must appear in the option. 


int num( str ) 
char *str; 
{ 
trace t "nun" ) 3 
if{ index({ str, '=' ) == NULL ) 
ret_val( 0 ) 
else 
ret_val( atoi( index( str, '=' ) +1) ) 


} 
#ifdef TRACER FUNCTIONS 


char ptr names[ 20 ]; 
int stack = 0; 


callstack( str ) 
char *styr; 

{ 
int is 
char; 


names[ stack++ ] 


copy protection and 
customer satisfaction? 


here's a better way to protect your software. 
It's called the Secom Key, and it works. or more information, contact 


_) The Key is completely transparent to the Secom Information Products Co. 


end user. | 
ies ; : 500 Franklin Square 
[_} Won't interfere with peripheral operations. e™ 1829 East Franklin Street 


[_} Doesn't occupy the disk drive. SEuanpeeial 
_) The Key allows unlimited backup copies. BB thesecom Key... 

[_] Makes site licensing easy and auditable. f & or 

[_) Fasily installed. Uses only 1000 bytes. — 

[_} Over 60,000 have been sold worldwide. 

[_} Same size as RS-232 plug. 

) Available in quantities for as low as $19.95. Secom Information Products Company 


A Subsidiary of Secom General Corporation 


Call Toll-free 1-800-843-0413 
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if( debug ) 
{ 
for( i = 0; i <-stack; i++ ) 
printr( ™ ” “ig 
printf( “Entering s\n", str ); 
} 
#ifndef VAX11C 
if( trace enabled && kbhit() ) 
{ 
switch( getch 


() ) 
{ . 


names[{ i 
); 


ae 


case ‘t's: 

case 'T's: 
debug = !debug; 
break; 

case 's': 

case 'S': 
printf( "\n----------- uy 
for( i = stack - 1; i >= 0; i-- ) 

princt( “\nts", 

printf ( "\n----------- \n" 
break; 

default: 
break; 


#endif 
} 
callpop (} 
{ 
imc i} 
if({ debug } 
{ 
for{ 1 = 07; i < stack; i++ ) 


princr(.” “3 
printf( "Exiting %s\n", names[ stack ] 


ie 


KADAK’s 

engineers bring 

years of practical real-time 
experience to this mature 


MULTI-TASKING SYSTEM 


(version 2.0) 
for the IBM® PC, PC/XT and PC/AT 


@ Dynamic operations: 
- task create/delete 
- task priorities 

- memory allocation 
Event Manager 


Semaphore Manager 


No royalties 

IBM PC DOS® support 

C language support 
Preemptive scheduler 
Time slicing available 
Intertask message passing 


AMX 86™ operates on any 8086/88, 80186/88, 80286 system. 


KADAK Products Ltd. 
206-1847 W. Broadway 
Vancouver, B.C., Canada 
V6J1Y5 

Ak Telephone: (604) 734-2796 
AUF telex: 04-55670 


Demo package $25 US 
Manual only $75 US 


AMX 86 system $2195 US 
(shipping/handling extra) 


Also available for 8080, Z80, 68000 
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End Listing 


FREE! FREE! 
Quick C .. Turbo C 


by MicroSoft by Borland _ 
With purchase of C Starter Package or C Business Library 
... until 8/31/87 
















C STARTER PACKAGE 
C Power Windows 
C Function Library 


Superfonts for C 
(A $309.85 VALUE + A FREE Compiler) 


C BUSINESS LIBRARY $299.95 
C Power Windows 
C Function Library 
Superfonts for C 


Btree and lsam 
(A $439.80 VALUE + A FREE Compiler) 


DON’T PAY MORE TO GET LESS! 
FIND OUT 713-468-4412 


Entcickon 


12118 Kimberley, Houston, TX 77024 


$199.95 
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Read what they’re saying about this 
popular program for prototyping and 
demo-making: 


“A winner right out of the start- 
ing gate. After you use DEMO 
once, you'll wonder how you got 
along without it.”’ 

—PC Magazine 


‘“‘Everybody who writes soft- 
ware, either commercially or for 
in-house applications, should 
immediately order a copy. Period. 
No exceptions.” 

—Soft: letter 


Product of the Month 
—PC Tech Journal 


Thousands of developers and most 

of the largest and best known software 
companies are using this program. 
You can, too. Act now! 


The perfect companion to the Demo 
Program. The Tutorial helps you learn 
the ins and outs of its basic and ad- 
vanced features. Complete with a 96 
page manual containing step-by-step 
instructions, diskette, and function 
key template. 





A- 
Use 800-number for orders only. 
Questions, special shipping, etc., call 617-332-2240. 
No Purchase Orders. Massachusetts residents add 5% 
sales tax. Outside of the U.S.A., add $15.00. 
Requires 256K IBM PC/Compatible, DOS 2.0 or later. 
Supports Monochrome, Color Graphics, and EGA 


Adapters (text mode only). The Tutorial requires the 
Demo Program. ; 





SOFTWARE 
GARDEN. INC. 


Dept. D 
P.O. Box 373, Newton Highlands, MA 02161 
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STRUCTURED PROGRAMMING 


Listing One (Text begins on page 122.) 


Listing 1: BASIC source code for the Sieve benchmark 


1000 
1001 
1010 
1020 
1030 
1040 
1050 
1060 
1065 
1070 
1080 
1090 


1100. 


1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
i223 
1230 
1240 


' Sieve Benchmark Test 
'" Version 1.0 5/30/86 Namir C. Shammas 
DEFINT A-Z 
SIZE = 7000 
MAXITER = 10 
TRUE = 1: FALSE = 0 
DIM FLAGS (SIZE) 
PRINT “START ";MAXITER;" ITERATION" 
TIMES = "00:00:00.00" 
FOR ITER = 1 TO MAXITER 
COUNT = 0 
FOR I = 0 TO SIZE 
FLAGS (I) = TRUE 
NEXT I 
FOR I = 0 TO SIZE 
IF FLAGS (I) <> TRUE THEN 1210 
PRIME = I+I+3 
K = I+PRIME 
WHILE K-<= SIZE 
FLAGS (K) = FALSE 
K = K + PRIME 
WEND 
COUNT = COUNT + 1 
NEXT I 
NEXT ITER 
PRINT "Time is ";TIMES 
PRINT COUNT;" PRIMES" 
END End Listing One 


Listing Two 


Listing 2: Translated C source code for the Sieve benchmark 


char 


*TIME (), *balloc(); 


static int *FLAGS, count, false, i, iter, k, maxiter, prime, size, true; 
static int.2t.1, it 2, it. 3; 

static char *st_1; 

static int ml_1; 

main(arge, argv) 


int argc; 

char *argv[]; 

{ 

bio init(argc, argv, 1); 

/* Sieve Benchmark Test */ 

/* Version 1.0 5/30/86 Namir C. Shammas */ 

size = 7000; 

maxiter = 10; 

true = 1; 

false = 0; 

ml 1 = sizet+l; 

bfree (FLAGS) ; 

FLAGS = (int*)balloc((long) sizeof(int) * (size+l)); 
BPRINT("s;i;s", "\OQO6START ", maxiter, "\012 ITERATION"); 
STIME_ ("\01300:00:00.00") ; 

it_1 = maxiter; 


for (iter = 1; iter <= it 1; ++iter) 


count = 0; 
it_2 = size; 


for (i = 0; i <= it_2; ++i) 
{ 

FLAGS [i] = true; 
} 


it_3 = size; 


for (i = 0; i <= it 3; ++i) 
{ 
if (FLAGS[i] != true) 
goto 1 1210; 
prime = i+ i + 3; 
k = i + prime; 
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while (k <= size) 


{ 
FLAGS [k] = false; 
k = k + prime; 
} 
count = count + 1; 
I A2i02; 
} 

} . 
BPRINT("s;s", "\010Time is ", TIME (&st_1)); 
BPRINT("i;s", count, "\007 PRIMES"); 
bexit (0); 
bexit (0); 

} End Listing Two 

Listing Three 


Listing 3: BASIC source code for a root-seeking program 


1010 DEFDBL A-H,P-Z : DEFINT I-O : CLS 

1040 INPUT "Enter function number [1..3] ";N : PRINT 

1050 IF (N < 1) OR (N > 3) THEN 1040 

1060 INPUT "Enter guess ";X : PRINT : READ Accuracy, MAX.ITER 
1070 DATA 1.0E-07, 50 

1075 Iter = 0 : Diverge%$ = 1 : Diff = 2 * Accuracy 

1080 WHILE ABS(Diff) > Accuracy ' Start root seeking method 
1100 H = .01 : IF ABS(X) > 1 THEN H = H * X 

1110 xX2=xX : GOSUB 1200 : FO = 

1120 X2 = X + H : GOSUB 1200 : Fl = 
1130 X2 = X - H : GOSUB 1200 : F2 = 
1140 Diff =2 * H * FO /(Fl - F2) = X - Diff : Iter = Iter +1 
1170 IF (Iter > MAX.ITER) THEN Diverge% 0 

1180 WEND . 

1190 IF (Diverge%’ = 0) THEN Accuracy = 10 * Accuracy 
1192 PRINT USING "Root = +#. #######°*%*°";X +: PRINT 
1194 PRINT USING "Number of iterations = ##";Iter : PRINT 
1196 PRINT USING "Accuracy = #.###****";Accuracy : PRINT 
1198 END 

1200 ‘Subroutine to handle function catalogue 

1210 ON N GOSUB 2100,2200,2300 : RETURN 


x Am | 


: GOTO 1075 


2100 F = EXP(X2) - 3 * X22 : RETURN 
2200 F = X2*2 - 5 * X2 + 6 : RETURN 
2300 F = 


X2“°3 - 5 * X2 + 10 : RETURN 
’ End Listing Three 
Listing Four 


Listing 4: Translated C source code for a root-seeking program 
typedef struct data 


unsigned d_line; 

char *d_ text; 

}DATA; 
static DATA da_1[] = {1060, "1.0E-08, 50\n"}; 
double ABS(), EXP(), f_raise(); 
static int divergeI, iter, max_iter, n; 
static double accuracy, diff, £, £0, £1, £2, hy, x, x2? 
DATA *data_stmts[] = 

{ 

dal, 0 

}; 
main(argce, argv) 

int argc; 

char *argv[]; 

{ 

bio init(arge, argv, 1); 


CLS (); 
1 1040:; 
_INPUT("P ;i", "\O35Enter function number [1..3]) ", &n); 
BPRINT("") ; 


Lf (=((m < 4)) 1 =((n > 3))) 
goto 1 1040; 
INPUT ("P ;d", "\016Enter guess : ", &Xx); 
BPRINT ("") ; 
BREAD (" d,i", &accuracy, &max_iter); 
(continued on next page) 
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the MKS Toolkit 


Speaks for Itself. 
(Need We Say More?*) 


“The MKS Toolkit is a terrific product! I depend 
on it every day.” 


“This is a very impressive piece of work and it 
can truthfully be said that it has made my 
PC-clone (NEC V-20 (@8MHz) into a computer! 
There is little doubt that MKS is offering the 
package with the most user power for the dollar 
on the market today.”’ 


“I wouldn’t be without the MKS stuff on a PC. And 
the documentation is superb! I use the MKS man 
pages to learn how to use awk and sed more 
efficiently on our BSD UNIX system at work!” 


“The Korn shell is great!" 


“This is a solid product. The program that 
makes my day is cpio, which allows me to move 
files to/from UNIX with minimum hassle and 
preservation of mod dates for make use.” 


“This program is a godsend for anyone who has 
to use both UNIX and MS-DOS... . ” 


“I like the MKS Toolkit a lot. The idea of having 
the same editor on the PC and UNIX machines 
sure makes my life a lot easier.” 


‘“. , at $139.00 the Toolkit is a bargain. 
.. . hope you all reap the rewards of your 
virtue.” 


“The MKS Toolkit has provided me with UNIX 
capabilities I thought I lost when I moved to my 
PG.” 


“I’m impressed with the MKS tools, in particular 
with the breadth of what you provide. . . . I can 
see an order of quality and completeness in the 
MKS tools not found in the PC/VI package.” 


*These are unsolicited comments from MKS 
Toolkit users. 


Price: $139 


Now available ina 
separate package: 
Vi 


Price: $75 


Mortice Kern Systems Inc. 


43 Bridgeport Road East, Waterloo, Ontario, 
Canada N2J 2J4 (519) 884-2251 
For information or ordering call collect. 
Prices quoted in U.S. funds. MasterCard, VISA, American Express, and 
purchase orders accepted. OEM & dealer inquiries invited. UNIX is a 
trademark of Bell Labs. MS-DOS is a trademark of Microsoft Corp. 
Site-licensed to major American corporations. No UNIX licence required. 
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#1 Lint for MS-DOS STRUCTURED PROGRAMMING — __ 


Listing Four (Listing continued, text begins on page 122.) 


1 1075:; 
iter = 0; 
divergelI = 1; 
adiff = 2 * accuracy; 
while (ABS(diff) > accuracy) 
{ 
/* Start root seeking method */ 


h = 0.01; 
if (ABS(x) > 1) 
h=h* x; 

x2 = xX 
pr_1200(); 

f0 = f; 

x2 = x+h; 
pr_1200(); 

fl = f; 

x2 = x - h; 
pr_1200(); 
f2 = f; 


diff =2* h * £0 / (f1 - £2); 
x= x - aiff; 
iter = iter + 1; 
if (iter > max_iter) 
divergeI = 0; 
} 
if ((divergeI == 0Q)) 
{ 


ve accura¢y = 10 * accuracy; 
The professional ie goto 1 1075; 


; ; sas | } 
diagnostic facility for C UPRINT ("\O25Root = +#. FERRER EEC“S SS", "a" x) : 


as ae 
ee NS 





oe 
7a <3 





ee 
: . I a 
eee - 

e 


BPRINT(""); 
™ PC-lint lets you zap swarms of C ; 
: ; UPRINT("\032Number of iterations = ###", "i", iter); 
‘@ bugs and glitches at a time. | BPRINT ("") ; 
1 | Now you can uncover the quirks, UPRINT ("\O24Accuracy = #.###°*%°*", "d", accuracy) ; 
inconsistencies, and subtle errors BPRINT("") ; 
that infest your C programs . . . bexit (0); 
waiting to bite you. PC-lint finds } 
them all ... Of aS many as you pr 1200() 
want ... in one pass. Set PC-lint ~ { 
to match your own style. /* Subroutine to handle function catalogue */ 


switch (n) 


Outperforms any lint at any price ( 


@ Full K&R support and case l: 
common ANSI enhancements pr_2100(); 
(even MS keywords) break; 

case 2: 


# Finds inconsistencies 


; . ; pr 2200(); 
(especially in function calls break: 
across multiple modules!) Gace. 3s 
® Modifiable library descriptions ! pr_2300(); 
| for 8 popular compilers ) break; 
@ & Super fast,one-pass operation 
| = Suppress any error message | } 
ff & Zillions of option ! a 
4 iad ° /* Subroutine number 1 */ 
‘ma PRICE $139 *>MC+-VISA-COD @ } 
‘@- Includes USA shipping and handling. $ t 
“Bh Outside USA, add $15. In PA add 6%. a ) 
, % 
@, ORDER TODAY, i f = EXP (x2) - 3 * £ raise(x2, (double) 2); 
‘@, 30-day guarantee return; 
a 







Runs under MS-DOS 2.0 and up, and 
i} AmigaDOS. Uses all available memory. ; 


/* Subroutine # 2 */ 
} 


t 
' 
1% 
(f 
Trademarks: PC-lint (Gimpel Software), A: 
MS, MS-DOS (Microsoft), Amiga (Commodore) 4 } 
|i 
{ 
| 
| 
if 


ee RE 


pr_2200() 
{ 
f = f_raise(x2, (double) 2) - 5 * x2 + 6; 
return; 
/* Subroutine # 3 */ 
} 








sae et NS < =: 
a ee 


ay 
{ 


a re 


‘ ~ 
- 
\ ahaa 
+ 
—a 
» -— 


‘\ 
T 3207 Hogarth Lane, 
i Collegeville, PA 19426 


_ (215) 584-4261 


1) 





pr_2300() 
{ 
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Listing Five 


f = f raise(x2, (double) 3) - 5 * x2 + 10; 


return; 
bexit (0); 


} 


Listing 5: BASIC source code for Find/Replace utility. 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1330 
1340 
1350 
1360 
1370 
1380 
1390 


1400 
1420 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 


‘ Batch Find/Replace Utility Version 1.1 2/7/86 
‘ IBM PC BASICA version 2.0 
‘ Copyright (c) 1987 Namir Clement Shanmas 


OPTION BASE 1 

DEFINT A-Z 

DIM FILENAMES (20) , FIND .STR$ (30) 

DIM REPLACE.STR§ (30) , REPLACE .FLAG (30) , TEXT. LINES (500) 


TRUE = 1: FALSE = 0 ‘Set true/false 
MAX.LINES = 500 ' Current maximum number of lines read from a file 
MAX.STRINGS = 30 ' Number of find/replace strings 
MAX.FILES = 20 ' Maximum number of files 
CLS 
t 
T$ = "BATCH FILE FIND/REPLACE PROGRAM" ; GOSUB 2290 
T$ = “VERSION 1.0" : GOSUB 2290 : PRINT : PRINT 
GOSUB 1560 'GET.FILENAMES : Get filenames 
GOSUB 1820 ‘GET.STRINGS : Get search/replace strings 
FOR K = 1 TO NUM.FILES 
GOSUB 2060 ' READ.LINES: Read text lines froma file 
CHANGED = FALSE 
FOR I = 1 TO NUM.STRINGS 
FOUND = FALSE 
FOR J = 1 TO NUM.LINES 
PTR = INSTR (TEXT.LINES (J), FIND.STRS (I) ) 
WHILE PTR > 0 
IF (FOUND = TRUE) THEN 1330 
FOUND = TRUE 
LPRINT 
LPRINT “KEYWORD : “;FIND.STRS (I) 
LPRINT J;":"; TEXT .LINES (J) 
IF (REPLACE.FLAG(I) = FALSE) THEN 1440 
CHANGED = TRUE 
FIRST$ = "*" 
IF PTR > 1 THEN FIRSTS = MIDS (TEXT.LINES(J),1, (PTR-1) ) 
LAST$ = "" 
IF (PTR+LEN (FIND.STR$(I))) <= LEN (TEXT.LINES (J) ) 
THEN 1420 
LAST$ = MIDS (TEXT.LINES (J), (PTR+LEN (FIND.STR$ (I) ))) 
TEXT.LINES$(J) = FIRST$ + REPLACE.STR$(I) + LASTS 
PTR = INSTR (PTR+t1, TEXT. LINES (J) , FIND.STRS (I) ) 
WEND 
NEXT J 
NEXT I 
IF (CHANGED = TRUE) THEN GOSUB 2190 ' WRITE.LINES 
NEXT K 


LPRINT CHR$(140) ‘* form feed 


END 


eee ew eee ee ee ww ewe ewe Oe we ee ee eee Oe ee Oe Owe ee ee we ee Oe ee 


' GET.FILENAMES: Subroutine to input filenames from the keyboard 
NUM.FILES = 0 
WHILE (NUM.FILES <= 0) OR (NUM.FILES > MAX.FILES) 


INPUT "Enter number of files ";NUM.FILES 
PRINT 
WEND 
FOR I = 1 TO NUM.FILES 
"REPEAT.LOOP1: 
PRINT “Enter filename # ";I;" "; 
INPUT FILENAMES$(I) : PRINT 
ON ERROR GOTO 1750 
OPEN "I*,1,FILENAMES (I) 
CLOSE #1 
ON ERROR GOTO 0 
IF FILENAME$(I) = "" THEN 1630 
NEXT I 
RETURN 
0 css acs eas ans es Ges am es Gas (Gu ub Sb esd ab nd Gas ln kd ts ls ge Gd od ass ce a ec oe ae ee a ee ee ae eens 
‘HANDLE: Error hander for bad filenames 
PRINT "File ";FILENAMES(I);" was not found" 
PRINT 
FILENAMES (I) = "* 
RESUME NEXT 
IG oa cas ces cau i ca aes Gaus a Gas wand Gate ao a Gas Gas ms Ga a Ga OO Oe GO Ow Sb Gn aes Gb Gb oes ans Go eo a as Gs Un as Ga aa aw ee 
* GET.STRINGS: Subroutines to input search/replace strings 


NUM.STRINGS = 0 


WHILE (NUM.STRINGS <= 0) OR (NUM.STRINGS > MAX.STRINGS) 
INPUT “Enter number of search/replace strings ";NUM.STRINGS 
PRINT 

WEND 

FOR I = 1 TO NUM.STRINGS 


REPLACE.STR$(I) = "* 
PRINT : PRINT “For string # “;I 
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End Listing Four 
The MPULSE Model 20 








(continued on next page) 


68020 


UNIX ‘COMPATIBLE 
MULTIUSER SYSTEM 





Multi-Processor Design: 


Separating application processing from I/O is a well 
understood goal in multiuser supermicrocomputer | 
design. As the real UNIX system bottleneck is disk /O | 
bandwidth, not raw processor speed, LPC has spent a 
great deal of time and development effort in optimizing 
disk I/O throughput. The result is a disk I/O 
subsystem unparalleled in the under $20,000 
microcomputer class. 


A fully asynchronous, high speed DMA channel 
links the MC68020 to the dual MC68000 I/O 
processors. A full 2 Mbytes of I/O processor memory 
is available for disk caching. The disk cache utilizes a 
least recently used, delayed write algorithm to achieve 
hit rates exceding 90%. 


In addition to disk caching, LPC has extended the 
conventional UNIX caching mechanism with a new 
virtual caching technique, implemented in the kernel 
itself. The Dynamic Kernel Cache (DKC) distributes 
available memory between user processes and the 
internal UNIX cache. This dynamic allocation 
technique allows a much more efficient use of main 
memory with cache efficiency increased to over 80%, 
much higher than the conventional UNIX caching 
mechanism. 


Operating System: 


The MPULSE Model 20 hosts LPC's System V 
operating system, derived from the industry standard 
UNIX System V. The MPULSE System V port is 
tailored to complement the MPULSE hardware while 
retaining compatibility at all levels with the generic UNIX 
System V operating system. Areas of optimization and 
additional features include: 


@ Full demand-paged virtual memory 
@ Kernel portions of the terminal and mass storage I/O 
disciplines are distributed to the appropriate I/O 


processors 

@ Berkeley enhancements 

@ Dynamically distributed ramdisks 

@ On-line Winchester disk bad block replacement 

@ On-line device configuration 

@ True multisector I/O for streaming tape operation 

@ Support for implementing concurrent operating 
systems 

@ General purpose user-accessible SCSI device driver 

@ Automatic bi-directional modem support 

@ MWindows windowing capability 


Base System Includes: 






@ 16 MHz MC68020 host processor 
@ DUAL 12 MHz MC68000 I/O sub-system 

@ 4Mbytes main memory 

@ 2 Mbytes of dedicated disk cache memory 

@® Demand-Paged Virtual Memory 

@ Sophisticated LRU caching algorithm 

@ Dynamic Kernel Cache (DKC) 

@® MWindows 

@ 50 MByte hard disk expandable to 0.5 gigabytes 
@ 800 Kbyte floppy drive 

@ 60 Mbyte cassette tape backup 

@ 8 serial ports expandable to 40 serial ports 

@ LPC System V derived from UNIX System V 

@ Berkeley Enhancements 

@ NCR Tower object code compatibility 












































Base System Price: 


$5995.00 
Call (214) 340-5172 


Warranty: 
90 day (extended warranty available) 
15 Day money back evaluation period 


LPC Logic Process Corporation 
10355 Brockwood Road Dallas, Texas 75238 


DKC and MWindows are trademarks of LPC. 
UNIX is a trademark of AT&T. 
Tower is a trademark of NCR. 
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DIRECTLY 
ACCESS 


aBASE Ill 
DATA FILES 


db DOS $39.95 


CREATE, VIEW AND EDIT dBase III 
data files from the DOS prompt. Use 
fast and powerful full screen editing 
with search, append and direct 
GOTO capabilities. Output to the 
screen or printer at your choice. All 
this from the DOS prompt. 


db PASCAL $29.95 


TURBO CHARGE YOUR TURBO PAS- 
CAL FILE ACCESS by using dBase III 
data files. Simple dBase III file 
access allows report output with 
turbo speed. Includes a create util- 
ity which writes record structure 
code automatically This allows field 
access using dBase field names. 
Sample programs provided and 
source code is included. 


ORDER NOW 


Phone orders 


1-800-433-6854 


In Arizona 


(602) 435-2370 


Or send check or money order to: 
LogicPath PO. Box 1267 


Chandler, Arizona 85224-1267. 

We welcome Visa/MC or COD in certified US 
funds only Add $2.50 for shipping per order. In 
Arizona add 6% sales tax. Call or write 

for other products or additional information 
(602) 435-2370. 


OGICT AT 


P.O. Box 1267 e Chandler, AZ 85244-1267 
dBase III is a trademark of Ashton-Tate. 
Turbo Pascal is a trademark of Borland Intl. 
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STRUCTURED PROGRAMMING 


Listing Five (Listing continued, text begins on page 122. ) 


1910 INPUT “™ Enter string ";FIND.STR$ (I) 

1920 INPUT R)eplace F)ind ";A$ : PRINT 

1930 IF (INSTR ("Rr",MIDS(A$,1,1)) = 0) THEN REPLACE.FLAG(I) = 

FALSE ELSE REPLACE.FLAG(I) = TRUE 

1980 IF REPLACE.FLAG(I) = FALSE THEN 2020 

1990 INPUT "Enter replacement string “;REPLACE.STRS (I) 

2000 PRINT 

2020 NEXT I 

2030 RETURN 

2040 

2050 8 mann nnn nn a nn nn nnn nnn nnn nn nee 

2060 * READ.LINES: Subroutines to read text lines 

2070 LPRINT 

2080 LPRINT “PROCESSING FILE : “;FILENAMES (K) 

2090 OPEN "I",1,FILENAMES (K) 

2100 NUM.LINES = 0 

2110 WHILE (NOT EOF(1)) AND (NUM.LINES <= MAX.LINES) 

2120 NUM.LINES = NUM.LINES + 1 

2130 LINE INPUT #1, TEXT.LINES$ (NUM.LINES) 

2140 WEND 

2150 CLOSE #1 

2160 RETURN 

2180 '§ a2 nnn nn nn nn nnn nnn == 

2190 ° WRITE.LINES: Subroutines to write text lines 

2200 OPEN “O",1,FILENAMES (K) 

2210 FOR I = 1 TO NUM.LINES 

2220 PRINT #1, TEXT.LINES (I) 

2230 NEXT I 

2240 CLOSE #1 

2250 RETURN 

2270 8 enna nn en ee oe ee 

2280 * Subroutine to center a message 

2290 PRINT SPC(40 - LEN(TS$) \2);TS 

2300 RETURN End Listing Five 
e e e 

Listing Six 


Listing 6: Translated C source code for Find/Replace utility. 


extern int cn_error, err_code, err_stmt, trap line, trap err; 


char *CHR_(), 


*MID_ (), *s _asgn(), *s_cat(); 


int EOF (), INSTR (), LEN () ; 

Static int AREPLACE FLAG(31), changed, false, found, i, 4, k, max , files; 
static int max_lines, max_strings, num_files, num | lines, num | strings, ptr; 
static int true; 


static 
static 
static 
static 


char *FILENAME (21), *FIND _STR_(31], *REPLACE STR_(31]; 
char *TEXT_ LINE_ (501), *a_, *first _» *last_, ¥t = 

int itl, it _2, “dt se Jt 4, it_5, it _§3 

char *st_ 1, st _23 


main(arge, argv) 


sub_push(3); /* GET.FILENAMES 


int arge; 

char *argv(); 

{ 

bio init(arge, argv, 1); 

/* Batch Find/Replace Utility Version 1.1 2/7/86 */ 
/* IBM PC BASICA version 2.0 */ 

/* Copyright (c) 1987 Namir Clement Shammas */ 

/*® wen em on wn ww ww www ww ww ww wn ww ww ww ew ew ww www ww we eo ee we 
free_sp(FILENAME , 21, 'S'); 

free_sp(FIND STR_, 31, 'S'); 

free Sp (REPLACE | STR Ve ane *S*)3 

free. _Sp(TEXT_LINE , ~501, 'S'); 


true = 1; 

false = 0; /* Set true/false */ 

max_lines = 500; /* Current maximum number of lines read froma file */ 
max_strings = 30; /* Number of find/replace strings */ 

max files = 20; /* Maximum number of files */ 

CLS(); 


t_ = s_asgn(t_, "\O37BATCH FILE FIND/REPLACE PROGRAM") ; 
sub_push (1); 
goto 1 2290; 


ee 
ea 


t_ = s_asgn(t_, 


sub_push (2) ; 
goto 1 2290; 


“"\O1L3VERSION 1.0"); 


ee 
ee 


=3 
BPRINT(""); 


if (err_code) {err_stmt=0; goto err trap;)} 


ee 
ee 


BPRINT {"") ; 
if (err_code) {err_stmt=1; goto err trap;) 


: Get filenames */ 
goto 1 1560; 


ees 
ee 


sub_push(4); /* GET.STRINGS 


: Get search/replace strings */ 
goto 1 1820; 


ee 
ee 


it_1 = num _files; 
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286 / 386 ‘Protected Mode’ Version Now Available 


TEXT LINE: 15 COL: 16 FILE: PHOTO . 203 
DOW , 


/* Main loop - displays the ma} VEDIT PLUS is an advanced editor that 
makes your program development and word 
do { processing as efficient and easy as 
scrlines = SCRLINES; possible. VEDIT PLUS is simple enough to 
scrwidth = QCRWIDTH: learn and use for the novice, yet has the 
clrscreen(scr1]ines-26): speed, flexibility and power to satisfy 
show( main_menu ); the most demanding computer professional. 
ret_val = getrange( mm_pro| VEDIT PLUS is particularly suited for 
process( ret_val, (new_ved| writing all types of programs and lengthy 
} while ( ret_val *= EXIT_OK )| documents such as reports or manuscripts. 








.sp 2 
This shows how JEDIT PLUS can perform 


if (new_vedit & (table_in '= | windowing. One window is used for word # PROG RAM MAB LE 
printf( crt_sel ): processing, a sécond for program 
if (yesno(" ")) setcrt( ar] development, and the third for commands. EDITOR 
else outcrIf(): Up to 48 windows are supported and you 

} determine each window's size and color. 


WINDOW $ 


DIRECTORY C: \VEDIT\NEW | FREE Fully Functional 


COMPARE .VDM CV203  .VDM MAIL  .VDM MENU  .UDM PRINT = .VDM 


SORT  .VDM STRIPV .VDM 288-8086. VDM Demo Disk * 





Stunning speed. Unmatched performance. Total flexibil- 


ity. Simple and intuitive operation. The newest VEDIT 3 
PLUS defies comparison. ai ee / by seve hiro 
Try A Dazzling Demo Yourself. ully NeEtTWO ompa 


The free demo disk is fully functional - you can try all 
features yoursell. Best, the demo includes - dazzling e Simultaneously edit up to 37 files of unlimited size. 


while another gives instructions. ° ‘Virtual’ disk buffering simplifies editing of large files. 
| 640K. 

The powerful ‘macro’ programming language helps you ¢ Memory management supports up to 

eliminate repetitive editing tasks. The impressive | ° oe ae iene other programs. 

demo/tutorial is written entirely as a ‘macro’ - itshows that A 


4 e Horizontal scrolling - edit long lines. 
no other editor's ‘macro’ language even comes Close. e Flexible ‘cut and paste’ with 36 ‘scratch-pad’ buffers. 


Go ahead. Call for your free demo today. You'll see why e Customization - determine your own keyboard layout, create 


rs, your own editing functions, support any screen size. 
varias cain eee ne aaa ef PIediammels e Optimized for IBM PC/XT/AT. Color windows. 43 line EGA. 


Available for IBM PC, Tandy 2000, DEC Rainbow, MS- | EASY TO USE — | 
DOS, CP/M-86 and CP/M-80. (Yes! We support windows e Interactive on-line help is user changeable and expandable. 


on most CRT terminals, including CRT’s connected to an e On-line integer calculator (also algebraic expressions). 
; e Single key search and global or selective replace. 
IBM PC.) Order direct or trom your dealer. $185. e Pop-up menus for easy access to many editing functions. 
e Keystroke macros speed editing, ‘hot keys’ for menu 
Compare features functions. 
and speed eer Aah PMAIE Male FOR PROGRAMMERS 
e Automatic Indent/Undent for ‘C’, PL/I, PASCAL, etc. 
e Match/check nested parentheses, i.e. ‘{’ and ‘}’ for ‘C’. 
Si oe eau nacre be ne Vi has e Automatic conversion to upper case for assembly language 
Built-in macros Yes NO ta ed labels, opcodes, operands with comments unchanged. 
Keystroke macros oy 1 No - ne e Optional 8080 to 8086 source code translator. 
Multiple file editing 20 2 O 
Windows 20+ 2 No 20* FOR WRITERS | | 
Macro execution window No No No Yes e Word Wrap and paragraph formatting at adjustable margins. 
Trace & Breakpoint macros No No Yes Yes ° ie dg aaa as ; Siena 
Y Yes Yes ¢ Support foreign, graphic and special characters. 
iced a ea ue a . e Convert to/from WordStar and mainframe files. 
i a das a Hard No end Easy e Print any portion of file; selectable printer margins. 
ayou 
‘Cut and paste’ buffers 1 1 1 36 MACRO PROGRAMMING LANGUAGE 
Undo line changes Yes No No Yes e ‘If-then-else’, looping, testing, branching, user prompts, 
Paragraph justification No No No Yes keyboard input, 17 bit algebraic expressions, variables. 
On-line calculator No No No Yes e Flexible windowing - forms entry, select size, color, etc. 
Manual size / index 250/No 42/No 469/Yes 380/Yes | ¢ Simplifies complex text processing, formatting, conversions 
and translations. 
Benchmarks in 120K File: e Complete TECO capability. 7 
, in 6 e Free macros: e Full screen file compare/merge e Sort mailing 
2000 replacements 1:15 min 34 sec 1:07 min 6 sec lists:@-Print Formatter » Menu-driven tutorial 


Pattern matching search 20sec Cannot Cannot 2 sec 
Pattern matching replace 2:40 min Cannot Cannot 11sec 


ae 
VEDIT and CompuView are registered trademarks of CompuView Products, Inc. BRIEF is a 
trademark of UnderWare, Inc. PMATE is a trademark of Phoenix Technologies Ltd. Norton 
Editor is a trademark of Peter Norton Computing Inc. 


* Demo Disk is fully functional, but does not readily write large files. 
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Listing Six (Listing continued, text begins on page 122. ) 


for (k = 1; k <= it_l; ++k) 
{ 
sub_push(5); /* READ.LINES: Read text lines froma file */ 
goto 1 2060; 
g_533 
changed = false; 
it_2 = num_strings; 


for (i = 1: i <= it_2; ++i) 
{ 
found = false; 
it_3 = num_lines; 


for (j = 1; j <= it_3; ++}) 
{ 
E 3:3 


ptr = INSTR(-1, TEXT LINE _[4), FIND_STR (1)); 
if (err_code) {err_stmt=3; goto err_trap;) 


E43; 
while (ptr > 0) 
{ 
if ((found = true)) 
goto 1_ 1330; 
found = true; 
E533 


BLPRINT("") ; 
if (err_code) {err_stmt=5; goto err_trap;} 
E63; 
BLPRINT("s;s", "“\O12KEYWORD : ", FIND_STR_[i]); 
if (err_code) {err_stmt=6; goto err_trap;) 
E733 


1_1330:; 
BLPRINT("“i;s;s", 3, “\001:", TEXT_LINE_[j)); 
if (err_code) {err_stmt=7; goto err _trap;} 


E 8:; 
if ((AREPLACE FLAG(i]) == false)) 
goto 1 1440; 
changed = true; 
first_ = s asgn(first_, “\000"); 
if (ptr > 1) 
{ 
E_9:; 


first_ = s_ asgn(first_, MID (ést_1, TEXT_LINE_[j), 
is (ptr = 1)))3 
if (err_code) {err_stmt=9; goto err trap;} 


E.10:; 
) 
last_ = s_asgn(last_, "\000"); 
if ((ptr + LEN(FIND STR_[i]))) <= LEN(TEXT_LINE_[3))) 
goto 1 1420; 
E11:; 


last_ = s_asgn(last_, MID (ést_1, TEXT_LINE_[j], (ptr 
+ LEN(FIND STR_[i])), -1)); 
if (err_code) ({err_stmt=1l; goto err_trap;} 
E 12:; 


1 1420:; 
TEXT_LINE_[j] = s_asgn(TEXT_LINE_[j], s_cat(ést 2, 8 
_cat (ést_1, 
first_, REPLACE STR_[i])), last_)); 


if (err_code) {err_stmt=12; goto err_trap;} 
E 133; 


1 1440:; 
ptr = INSTR(ptr + 1, TEXT_LINE_[4], FIND_STR_[i]}); 
if {err_code) {err_stmt=13; goto err trap;} 


E14:; 
) 
} 
} 
if ((changed == true) ) 
{ /* WRITE.LINES */ 
sub_push(6); /* WRITE.LINES */ 
goto 1 2190; 
g 6:; 
} 
} 
E153; 


BLPRINT("s", CHR_(&st_1, 140)); /* form feed */ 
if (err_code) (err_stmt=15; goto err trap;) 
E_16:; 
bexit (0) ; 


1_1560:; 
/* GET.FILENAMES: Subroutine to input filenames fromthe keyboard*/ 
num_ files = 0; 
while (-((num_files <= 0)) | -((num_files > max files) )) 
a 
E.17:; 
INPUT("P ji", "\O26Enter number of files ", snum_files); 
if (err_code) {err_stmt=17; goto err_trap;) 
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TSF is owned and operated by 
programmers, so we _ understand 
your needs. We believe and prac- 
tice integrity in all business deal- 
ings. We advertise our real prices 
and offer the best possible terms to 
all our customers. We _ provide 
prompt delivery and current ver- 
sions. 


We carry only products which we 
have personally used or which 
come with strong recommendations 
from programmers we respect. We 
have both the technical capability 


interest 


and the 
specific needs and to answer your 


to meet your 


technical questions. We gladly 
quote on special orders and volume 
discounts.. 


We accept checks, Visa, 
MasterCard, American Express 
and COD. We charge your card 
only when we ship and do not add 
a surcharge. We provide free UPS 
delivery on orders over $100. ($3 
shipping on small orders. $2 COD 
fee.) We accept returns on most 
products. Give use a try! 


August Special: Blackstar "C" Functions only $99 
save over 20% 


NEW! From Sterling Castle ... 


BLACKSTAR "C" FUNCTIONS 


Complete Development Package for the Latest "C" Compilers 







Version 4.0 now includes: 








e EGA support 


BlackStar "C" Functions Library 
has over 300 functions. Supports 
the ANSI standard language and 
is compatible with the Microsoft 
version 3.0/4.0, Lattice version 
3.0, and Borland Turbo C com- 
pilers. 


Organized into easy to use 
modules, Blackstar "C" Function 
Library lets you concentrate on 
your users specifications by 
providing pre-written solutions for 
the housekeeping functions re- 
quired in almost every program. 
BlackStar "C" Function Library in- 
cludes support for 


eFiles and Directories 
eDate and Time 

e Mouse Handler 

e Windows 

eKeyboard and Display 

e Stay-Resident Programs 
eMany more ... 


e Terminate and Stay Resident development 





The — Black- 
star 1G" 
Library 


provides 
hundreds of 
tools to im- 
prove the 
quality of your programs and to 
improve your own programming 
productivity. Includes complete 
source code and supports both 
small and large memory models. 
The 375 page manual and four 
diskettes feature more explana- 
tions and additional demo 
programs. No royalties. At 
TSF’s August special price of 
$99, its the best value in commer- 
cial quality C function libraries. 
Don't delay, call or write now to 
place your order! 30 day money 
back guarantee 


STERLING CASTLE” » 


Sterling Castle, 702 Washington St., Suite 174, 
Marina del Rey, CA 90292 
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The Software Family 
649 Mission Street 
San Francisco, CA 94105 


800-443-7176 


In California or outside U.S. 


(415)583-4166 


August Specials 


Datalight Optimum C....... $95 
Borland Turbo Basic......... $59 
Borland Turbo C ...........0008 $59 
BlackStar C Functions..... $99 


Other TSF Values 


Aldebaran Source Print ($75) .... $59 
Blaise C Tools + (list $175) ....$125 
Blaise Light Tools for Dataligh.........$83 
Blaise Turbo Power Tools + ........ $79 
Borland Turbo Basic (list $99).... $59 


Borland Turbo C (list $99) ......... $59 
Creative Vitamin C ($225)........ $159 
Creative VC Screen ($100)........... $79 


Datalight Optimum C w/Easy Edit $95 
Gimpel C-Terp Specify compiler.... $224 
Gimpel PC-Lint (list $139)........ $103 


Greenleaf Data Windows ........... $157 
Guidelines C+ + (list $195).......$175 
Lattice C (list $500) .ssccsscssssssseeee $270 
Microsoft C w/Codeview............. $270 


Microsoft Fortran w/Codeview .. $270 
Microsoft Quick Basic (list $99).. $65 
MKS Toolkit Korn shell, vi, more ....$115 
Periscope Periscope I ($345)......$279 
Periscope Periscope II ($175).... $139 
Periscope Periscope III ($995) ..$799 
Phoenix PFix-86 + (list $395) ....$250 
Phoenix Plink-86 + (list $495)... $315 
Turbo Power TDebug Plus............ $48 
Turbo Power Optimizer w/Source . $99 


Call or write to request 
your FREE copy of our 
comprehensive catalog. 





Quelo® 68000 sodaale 
WY 


Tools 


First release 1983 - MOTOROLA compatible - produces ROMable code, 
S-records, extended TEK hex, UNIX COFF. Portable SOURCE CODE. Na- 
tive and cross versions on: ATARI ST, AMIGA, Masscomp, Sun, Apollo, 
Charles River, VAX VMS and UNIX. 


68020 Cross Assembler Package 


Supports 68000, 68010, 68020, 68881 and 68851 
For CP/M 68K and MS/PC DOS - $750 


68000/68010 Cross Assembler Package 


For CP/M 80, -86, -68K and MS/PC DOS - $595 


68000 ‘‘C’’ Cross Compiler 


For MS/PC DOS by Lattice, inc. - $500 


z 


68020 Disassembler 


Supports 68000, 68010, 68020, 68881, 68851 Ww 
For CP/M 68K and MS/PC Dos - $495/295 


zm 


I Amiga and Atari ST - $119/79. CRDS UNOS $995/595 I 
T T 
E 68000/68010 Software Simulator E 
M M 
s For MS/PC DOS by Big Bang Software, Inc. - $285. VAX - $1900 s 
Call Patrick Adams today: Quelo, Inc. 


2464 33rd. West, Suite #173 
Seattle, WA USA 98199 
Phone 206/285-2528 
Telex 910-333-8171 


Site, Corporate, OEM licenses 
COD, Visa, MasterCard 


TM Quelo, Quelo, inc. MS, Microsoft Corporation, CP/M, Digital Research 


CIRCLE 377 ON READER SERVICE CARD 






PC-DOS program 
lets your PC 
Read/Write/Format 
over 300formats 


o<XSNOCRPyaAPIG 


|, Fred Cisin 


$79.95 + $5.00 S/H Sales Tax if CA. 





Upgrades available from previous versions 
Ask about FREE CP/M emulator! << 


To Order Contact: 


S<ENESver 


1454 Sixth Street, Berkeley, CA 94710 
vee (415) 525-3113 GS 


CIRCLE 225 ON READER SERVICE CARD 


Dr. Dobb's journa! 


subscription 
Problems? 


No Problem! 


Co 


Give us a call and we'll 
straighten it out. Today. 


Outside California 
CALL TOLL FREE: 800-321-3333 


Inside California 
CALL: 619-485-6535 or 6536 
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E_18:; 
BPRINT ("") ; 
if (err_code) {err_stmt=18; goto err trap;) 
E_19:; 


) 


it_4 = num_files; 


for (i = 1; i <= it 4; ++i) 
{ 


1_1630:; 
/* REPEAT.LOOP1: */ 
E 20:; 
BPRINT(“s;i;s;", “\O2lEnter filename @ ", i, "\001 "); 
if (err_code) (err_stmt=20; goto err trap;} 
E 21:; 
INPUT(" s", &FILENAME [i}); 
if (err_code) (err_stmt=21; goto err _trap;} 


E 22:3 

BPRINT ("") ; 

if (err_code) {err_stmt=22; goto err_trap;} 

E 23:33 

on_error = 1; 

err_code = 0; 

trap line = 1; 
E 24:3 


BOPEN("\0011I", 1, FILENAME [i], -1)3 
if (err_code) {err_stmt=24; goto err _trap;} 


BCLOSE (1, 0); 

if (trap err) 
{ 
xer_msg(trap err); 
bexit (1); 
} 

on_error = 0; 

err_ code = 0; 

if (s_comp(FILENAME [i], "\000") == 0) 
goto 1 1630; 

) 

goto sub ret; 


1_1750:; 
/* HANDLE: Error hander for bad filenames */ 
E 26:; 
BPRINT ("s;s;s","\O005File “, FILENAME [i]},"\016 was not found") ; 
if (err_code) {err_stmt=26; goto err trap;) 
E2733 
BPRINT("") ; 
if (err_code) {err_stmt=27; goto err trap;} 
E 28:; 
FILENAME_[i] = s_asgn(FILENAME [i], "\000"); 
+terr stmt; 
goto un trap; 


1_1820:; 
/* GET.STRINGS: Subroutines to input search/replace strings */ 
num_strings = 0; 


while (-((num_strings <= 0)) | -((num_strings > max_strings))) 
E 29:; 


INPUT("P ;i", "\O047Enter number of search/replace strings ", 
énum_strings) ; 
if (err_code) {err_stmt=29; goto err_trap;} 


BPRINT ("") ; 
if (err_code) {err_stmt=30; goto err_trap;)} 


} 
it_5 = num_strings; 


for (i = 1; i <= it_5; ++1) 


{ 
REPLACE STR_[i] = s_asgn(REPLACE_STR [i], "\000"); 
E 32:; 
BPRINT(""); 
if (err_code) {err_stmt=32; goto err _trap;)} 
E_33:; 
BPRINT("s;i", "\O15For string #", i); 
if (err_code) {err_stmt=33; goto err_trap;} 
E 34:3 
INPUT("P 3s", "\021 Enter string “, &FIND_STR_[1i}); 
if (err_code) {err_stmt=34; goto err_trap;} 
E 35:3 
INPUT("P 38", “\023 R)eplace F)ind ", &a_);3 
if (err_code) {err_stmt=35; goto err_trap;} 
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Listing Six = (Listing continued, text begins on page 122.) 


THE ADA 
WORLD HAS 
CHANGED. 





VALIDATED 


Meridian’s AdaVantage™ v2.0 
compiler is acomplete 
implementation of the Ada® language 
that has been validated on the 

IBM PC/XT, IBM PC/AT, and the 
Zenith Z-248. Most of the 
representation clauses and 
implementation-dependent features 
are also available including 


apragma pack 

asize specification 

atask storage size 

afixed point small 

arecord representation clauses 
aaddress clauses 

apackage system 
arepresentation attributes 
apragma interface 
aunchecked storage deallocation 
aunchecked type conversions 


The compiler includes a complete set 
of utilities for managing the Ada 
program library and all of the 
standard packages including text_io, 
system, and calendar. 


BEST PRICE 
PERFORMANCE 


The Meridian AdaVantage 

compiler demonstrates the best 
price/performance of any PC Ada 
compiler. The compiler sells for $795 
in single quantities and it compiles 
about 1000 lines per minute on an 
IBM PC/AT. 


In addition to the production 
compiler, two other versions are 
available for general training and 
student use. The AdaTraining™ 
compiler sells for $395 and is 
intended for corporate and university 
educational environments. The 
AdaStarter™ compiler, priced at $129, 
incorporates all of the features of the 
AdaVantage production compiler, 
with certain limitations on the number 
of library units and the number of 
lines per compilation unit allowed. 
The full price of the AdaStarter 
compiler can be applied to a later 
purchase of the AdaVantage 
production compiler. 


ADDITIONAL 
PRODUCTS 


Two optional packages, priced at $50 


each, that provide DOS environment 
Support and miscellaneous utility 
routines are currently available. A 
source-level debugger and Ada 
editor will be available this Fall. 


Ada is a registered trademark of the U.S. Government (AJPO). AdaVantage, AdaTraining, and AdaStarter are 
trademarks of Meridian Software Systems, Inc. References to other computer systems use trademarks 


owned by the respective manufacturers. 
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CONFIGURATION 


The compilers all run in a standard 
PC configuration with 640K of 
memory, a hard disk, and DOS v2.1 or 
higher. 


To order today, or get more 
information, call toll-free 
1-800-221-2522. 





23141 Verdugo Drive, Suite 105 
Laguna Hills, CA 92653 
800/221-2522 (outside Calif.) 
714/380-9800 (inside Calif.) 
Telex: 650-268-0547 MCI 





Publication Quality 
Scientific Graphics 


Over 100 C routines make 


scientific plotting easy 


linear, log, & polar plots 

bar charts & Smith charts 

contour plots with labels 

3-D curves, 3-—D surfaces 

4 curve types, 8 markers, errorbars 
14 fonts, font editor 

unlimited levels of SUB°°scripts 


4096 x 3120 resolution in 16 colors 
on EGA, Tecmar, Sigma boards 


-> Zoom, pan, window and merge plots 
-> high resolution printer dumps 


SOURCE INCLUDED for personal use only 
$350. Demo $8 


256k, IBM, AT&T, Corona PCs, DOS 2.xx, 3.xx 
Most boards, printers, and plotters supported 
Microsoft, Lattice, DeSmet, Aztec, C86 compilers 


Polar Plot fest 
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Scientific Endeavors Corporation 
Route 4, Box 7S Kingston, TN 37763 (615) 376-4146 





Along With Your Computer, Your Time 
is the Most Important Thing You 
Own. . .So Why Waste It? 


Quilt Programmer Productivity 
Tools will help you manage your 
software projects and get control 
of your time! 


SRMS™ 
Software Revision Management System Intelligent Program Generation Utility 


Full Featured Revision Control System |=Controls the rebuilding of even the most 
=All Versions stored in a Single ASCII File | complex systems 
=Support for Unlimited Libraries = Relieves the developer of remembering which 
=Support for all programming languages modules need to be rebuilt based on recent 
- Allows you to use your current compilers | changes, how to rebuild them, and in what 
and editors without conflict order to rebuild them 
= Windowing Shell interface to simplify use] = Works with most compilers, assemblers, and 
= MERGE facility to consolidate different linkers 
development paths easily, while pointing | -Supports full macro definitions, UNIX make- 
out conflicting areas file compatability, recursive invocations, and 
=Full audit trail tracking and reporting on | command line parameters 
all library components =Interfaces completely with SRMS, providing 
= Handles big programming projects easily | you with a complete set of productivity tools 
to handle any size project 
= Requires DOS 2.1+, 128K F/H Disk 
= Requires DOS 2.1+, 224 K, F/H Disk 


SRMS Version 3.0.......cccccseeee-S185 | QMAKE Version 1.2......ccccccccscceeeeee S99 
SRMS + QMAKE SCOOOSS SCOOOSS SES OOS SOSOOED $250 


NSW 9 TXT Tools NISW 2 
QSE - Quilt Text Stream Editor 


QSRCH - Quilt File Search Utility 
(Like UNIX GREP) 
QDIFF - Quilt Windowing File Difference Utility 


TXTTOOLS Version § 1.0.........ccccceseees $85 


T 7048 Stratford Road 


LI | L Woodbury, MN 55125 ~ 1 
COMPUTING (612) 739-4650 
Volume Discounts and Dealer Inquiries Welcome 
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STRUCTURED 
PROGRAMMING 


Listing Six 
(Listing continued, text begins on page 122. ) 
E_36:; 


BPRINT("") ; 
if (err_code) {err_stmt=36; goto err trap;} 


E373; 









{ 
AREPLACE FLAG[i] = false; 
} 
else 
{ 
AREPLACE FLAG(i] = true; 
) 
if (AREPLACE FLAG(i) == false) 
goto 1 2020; 


INPUT("P ;s","\03lEnter replacement string ", &REPLACE STR_ 


if (err_code) (err_stmt=38; goto err_trap;} 
E_39:; 
BPRINT(""); 
if (err_code) {err_stmt=39; goto err_trap;} 
E_40:; 


1_2020:; 
) 
goto sub ret; 


1_2060:; 

/* READ.LINES: Subroutines to read text lines */ 
E 41:3; 

BLPRINT("") ; 

if (err_code) {err_stmt=41; goto err_trap;} 
E 42:; 


BLPRINT("s;s", “\O22PROCESSING FILE : “, FILENAME [k]); 


if (err_code) (err_stmt=42; goto err_trap;) 
E_43:; 
~ BOPEN("\001I", 1, FILENAME _[k], -1); 
if (err_code) {err_stmt=43; goto err_trap;} 
E443; 
num_lines = 0; 
while ((~(EOF(1))) & -((num_lines <= max_lines))) 
{ 
num_lines = num_lines + 1; 
E_453;3 
7 INPUT("FL1", 1, &TEXT_LINE_{num_lines]); 
if (err_code) {err_stmt=45; goto err_trap;} 
E 46:; 
} 
BCLOSE(1, 0); 
goto sub ret; 


[* anna none nnn nn nnn eo nnn enn nnn nnn ne nnn nn nnn nn nnn */ 
1 2190:; 

/* WRITE.LINES: Subroutines to write text lines */ 
E 4733 


BOPEN ("\0010", 1, FILENAME [k]), -1)3 

if (err_code) {err_stmt=47; goto err_trap;} 
E_48:; 

it_6 = num_lines; 


for (i = 1; i <= it_6; ++i) 
{ 
E_49:; 
BFPRINT(1, “s", TEXT_LINE_[i]); 

if (err_code) {err_stmt=49; goto err _trap;} 
E50:; } 

BCLOSE(1, 0); 

goto sub ret; 


/* Subroutine to center a message */ 
E 513; 


1_2290:; 

BPRINT(“b;s", 40 - LEN(t_) / 2, t_)3 

if (err_code) ({err_stmt=51; goto err trap; } 
E 52:; 

goto sub ret; 


bexit (0); 

sub ret: 

switch (sub pop()) 
{ 
case i: goto g 1; 
case 2: goto g 2; 
case 3: goto g 3; 
case 4: goto g 4; 
case 5: goto g 5; 
case 6: goto g 6; 


{i})3 


(continued on page 98) 
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C86PLUS 


Proprietary C compiler design 
applies artificial intelligence to 
produce highly optimized code. 
Provides a highly productive 

and sophisticated programming 
environment, especially in ROM 
applications development. Fea- 
tures Microsoft C v. 4.0 and UNIX V 
compatibility; C library source 
code; full ANSI libraries and over 
300 functions; ROMable code; 
small, compact, medium and large 
memory model support; 186/286/ 
386 code generations options; and 


8087/287 h 
support ae (8 Geas' 
RUWN/C Professional 


detect emulator. 

Powerful C interpreter lets you 
dynamically load and unload 
compiled functions, execute in real- 
time at compiled speed, test mod- 
ules with source code debugging 
and more. Includes more than 100 
example programs; ' aaa 
compatible with 
Lattice C and 
Microsoft C 4.0. 





Essential Comm 
Library Plus 


A C library Y us debugger stressing 
reliability and ease of use. It en- 
ables speeds to 9600 baud with 
XON/XOFF and XMODEM support. 
It includes a thorough manual with 
tutorial and easy-to-follow exam- 
ples and demos. The debugger 
turns your PC into a sophisticated 
line monitor while an internal edi- 
tor enables you to create, send or 


capture data, save it 

to a file, compute 

checksums or edit it 

Call for the latest 80386 
development software. 





in Hex or ASCII. 


boat. Your best source for 
best names in software. 


ADVANTAGE Make 


Full featured. Supports UNIX 
MAKE scripts, multiple targets in 
single definition, full —S 
self-referencing macros. | a 
Many internally defined 4%, 
macros; i.e.,§$, gx $< and re 
much more. & 


ADVANTAGE 
Disassembler 


Provides immediate feedback as 
you work, storing results in tables 
on disk. Final output is ready for 
MS assembler. Handles gg : 
.COM and .EXE files; 
8086/186/286 code and 
8087/287 coprocessors. 






PforCe + + 


Provides essential tools for object- 
oriented programming with C++. 
Speeds development time and en- 
sures cleaner, more maintainable 
programs. You can build entire 
systems with a minimum of new 
coding. Over 400 easy-to-use func- 


tions include windowing, database, 


B-trees, field editing, menus, com- 
munication, table hashing/parsing, 


string/file handling Moen? 


and time/date 

calculations. 

Windows for Data 
Build a state-of-the-art user inter- 
face into your user program. 
Complete system for building and 
managing menus, data-entry 
forms, user help and text files in a 
windowing environment. Begins 
where others end. Features in- 
clude: Field entry from lists of 
choices, scrollable regions for en- 
try of a variable number of line 
items, nesting and branching of 


forms and | 

menus. Unique oo Vermont 
built-in debug- vay Creative 
ging system. 7 Software 











Periscope II 


Periscope Ill sets a new standard 
in price/performance for real-time 
hardware breakpoint debuggers. 
You'll find the errors in real-time 
systems, stop intermittent failures, 
interface with undocumented sys- 
tems and eliminate bottlenecks in 
your code. It’s an easy transition 
from other models too, since the 
commands are a superset of those 
used in Periscope l, Il and II-X. One 
board works on PC/XT/AT. The 
system includes the board, break- 
out switch, software, manual and 
Se 
reference 

card. PERIS E 


Windows Software 
Development Kit 


Full-featured operating environ- 
ment for developing and running 
application programs. Sophisti- 
cated user interface provides 
windowing, menus, dialog boxes 
and more. View and run multiple 
applications simultaneously; ex- 
change data between programs; 
support keyboard control keys. 
Portable applications are inde- 
pendent of graphic devices. Full 
support for programs written in 
Microsoft C Compiler, Pascal and 
Macro Assembler. 
Includes utilities 
and sample code. 


Microsoft 





cai 1-800-847-7078 
In NY 914-332-1875 


or see your local Lifeboat Affiliated Dealer 


The Full-Service Source for Programming Software 








INTERNATIONAL SALES OFFICES 


LIEEDAAT 


Sel fader OOP“ * 





55 South Broadway 
Tarrytown, NY 10591 
Telex # 510-601-7602 


The names of the products listed are 
generally the trademarks of the 
sources of the products. 


Switzerland: Euro-Link 

Willisau 4145 813 514 

SATT Software West Germany: MEMA Computer GmbH 
Tokyo 03-295-3390 eee 347226 

Netherlands: SCOS Automation BV Omn 

phointeldén 07623/61820 


England: Grey Matter, Ltd. 
Devon 364-53499 

System Science, Ltd. 

London (01) 248-0962 

France: Compusol 

Paris 14 530 0737 

Italy: Lifeboat Associates Italia 
Milan 02-464601 


Japan: Lifeboat, Inc. 
Tokyo 03-293-4711 


Australia/New Zealand: 
MOS Computer Software/ 
Charlton Distributors 
Auckland (09) 766-361 
Canada: Scantel Systems 
Toronto (416) 449-9252 
Denmark: Ravenholm 
Copenhagen 288-7249 


Amsterdam 020-10 69 22 
Spain: Micronet, S.A. 
Madrid 1-262-3304 
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STRUCTURED 
PROGRAMMING 


Listing Six 
(Listing continued, text begins on page 122. ) 


Parallel Programming for “C” 


INTERWORK 


A Concurrent Programming Toolkit 











Interwork is a “C” program library which allows you to write 
your programs as a set of cooperating concurrent tasks. 
Very useful for simulation, real-time applications, and ex- 
perimentation with parallel programming. 


FEATURES 
Supports a very large number of tasks (typically more 
than 100) limited only by available memory. Low over- 
head per task results in very fast context switching. 
Provides a full set of inter-task communication (ITC) 
facilities, including shared memory, locks, semaphores, 
blocking queues, and UNIX*-style signals. Also has 
building blocks for constructing your own ITC facilities. 
Handles interrupts (DOS version) and integrates them 
into task scheduling. Supply your own interrupt handlers 
or block tasks on interrupts. 
Lets you trace task switches and inter-task 
communication. 
Comes with complete documentation including a user’s 
manual and reference manual of commands. 









err trap: if (trap err) 
{ 





xer_msg(err_code) ; 
bexit (1); 
) 
trap_err = err code; 
err_ code = 0; 
goto 1.1750; 












un_trap: if (!trap err) 







xer_msg(-99); 

bexit (1); 

} 
trap_err = err code = 0; 
switch (err stmt) 

{ 


















Interwork is available for the following systems: ele . cae = 
Hardware Operating System Price case 2: goto E 2; 
IBM PC, XT, AT PC-DOS 2.0 or later $129 case 3: goto E_3; 
IBM PC AT XENIX* $159 renin 
DEC VAX; SUN III UNIX 4.2BSD $249 case 6: goto E 6; 

PC-DOS version is compatible with DeSmet, Lattice, and sang ae ea 

Microsoft C compilers. case 9: goto E 9; 






case 10: goto E_10; 
case 11: goto E 11; 
case 12: goto E 12; 
case 13: goto E 13; 
case 14: goto E 14; 
case 15: goto E 15; 
case 16: goto E 16; 
case 17: goto E 17; 
case 18: goto E 18; 
case 19: goto E 19; 
case 20: goto E 20; 
case 21: goto E 21; 
CIRCLE 263 ON READER SERVICE CARD eee 22) Gere Eee 

case 23: goto E 23; 
case 24: goto E 24; 


case 25: goto E 25; 
case 26: goto E 26; 
case 27: goto E 27; 
case 28: goto E 28; 


case 29: goto E 29; 
case 30: goto E 30; 


Please specify hardware and operating system when 
ordering. Shipping and handling included; COD orders 
add $2.50. Send check or money order to: 


Ae Block Island Technologies 

Innovative Computer Software 

13563 NW Cornell Road, Suite 230, Portland, Oregon 97229-5892 
(503) 241-8971 


“Trademarks: UNIX, AT&T Bell Laboratories, Inc.; XENIX, 
Microsoft, Inc.; VAX, Digital Equipment Corporation 






















SOFTWARE FOR THE NS32000 case 32: goto E32; 
Hokus a8 bt Sots 30 


case 35: goto E 35; 
case 36: goto E 36; 


32K Multi-Tasking Kernel: $1500 caewcs1s goto B 37) 
Assembly source code for multi-tasking kernel, bans ASivaoks a9) 
including device driver for serial I/O me 


case 42: goto E 42; 
case 43: goto E 43; 


32K Math Package: $750 oS ea 
Assembly source code for Sin, Cos, Tan, Atan, eee, 
Log, Exp, and Sart. Single and double precision a 
versions. pie de esa 


case 51: goto E 51; 
case 52: goto E 52; 


32K Floating Point Package: $500 ) 
Assembly source code to emulate the 32081 3 
coprocessor in software. Emulation is transparent 
to user code. Allows building of systems with the 
coprocessor absent or optional. 


End Listings 


Price includes right to distribute binary copies in a 
product without royalties. 
Call W.R.LS.T. Inc. (800) 648-2252 


In New York State; (718) 937-7955 
8-33 40th Ave., L.I.C. N.Y. 11101 
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PAINLESS WINDOWS. 








Windows. Data Entry. Menus. 
Finally,a C programmers’ tool that makes 
them as easy to use as printf(). 

With Greenleaf DataWindows” 


you move in quantum leaps! 


EEE Snazzy Window Treatments aia 


DataWindows represents an important 
breakthrough in C programming tools. It 
sets you free so you can create exciting 
programs quickly and easily, saving both 
time and money! Developed to work with 
the IBM PC, XT, AT, compatibles, and 
MSDOS or PCDOS, DataWindows 1s a 
carefully tooled system of C functions which 
will jazz up your programs with 
unprecedented efficiency. 


Greenleaf DataWindows is integrated 
windows, transaction data entry, pop-up, 
pull-down, and Lotus style menu systems 
with: 
= Screen Management. You don’t have to 
remember what’s on the display or the 
sequence in which you put it there. 
DataWindows does the grunt work. 
There are no restrictions. 


= Transaction Data Entry. Data entry 
windows can have any number of fields 
with sophisticated options for reading 
many data types. Calls are made to help, 
validation, and other functions. Full 
featured text editing, protected and 
mandatory fields, dBASE type picture 
strings, context sensitive help, validation 
of fields and transactions, redefinable 
keys, password entry, attribute control, 
keyboard idle and much more. 


= Device Independence. It detects the type 
of display adapter your computer is using 
and adjusts to it automatically for CGA, 
EGA, or monochrome. Logical video 
attributes are easy to use for color or 
monochrome. 


= Compatibility. Runs with Microsoft 
Windows and IBM TopView. 


= The Greenleaf Tradition of Quality. Reliable 


products. Professional documentation that 


gets you up and running quickly and 
keeps you there. Reference card. 
Newsletter and Bulletin board. 


IBM, Microsoft & dBase, are registered trademarks of International 
Business Machines, Microsoft Corporation & Ashton-Tate respectively. 
PCDOS, IBM PC, XT, AT, & TopView are trademarks of IBM; MSDOS. 
and Microsoft Windows are trademarks of Microsoft Corporation. 





HE Stop Window Shopping aaa 





Order Today. Or call toll free for a free 
demo of the windows library that makes 
all the others obsolete. 


Order any of these high performance 
tools by calling your dealer or 
1-800-523-9830 today. Specify compiler 
when ordering. Add $8 for UPS second 
day air, or $5 for ground. Texas residents 
add sales tax. MasterCard, VISA, P.O., 
check, COD. In stock, shipped next day. 


Greenleaf DataWindows $225 
DataWindows Source Module $225 
The Greenleaf Comm Library v2.0 $185 
The Greenleaf Functions v3.0 $185 
Digiboard Comm/4-II $325 
Digiboard Comm/8-II $535 





GREEINIEAI 
a a 
1411 LeMay Drive, Suite 101 
Carrollton, TX 75007 


Call Toll Free 
1-800-523-9830 


In Texas and Alaska, call 


214-446-8641 
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aa? Window Dressings Ease es 


= Simple or Complex Windows. Up to 254 
powerful overlaid windows 
simultaneously, all with just one kind of 
window to remember! Yet any window 
can be from one character to 32K! 


= Easy Window Operations. DataWindows 
lets you move, zoom, frame, title, change 
colors, titles, frames, size, location, and 
make windows visible or invisible at will! 
Functions set cursor, attributes, and write 
data to any window or “current window’. 
Word wrap, auto scroll, keyboard 
functions. 


= Write to Any Window Any Time. Windows 
may be visible, overlaid, or invisible, and 
you can write to them anyway. What you 
write will be seen when the windows 
become visible. 


®@ DataWindows is fast! It writes directly to 
video memory (in some modes). 


@ Easy to save! Any window, complete with 
attributes, can be saved on disk quickly 
and efficiently. 


™ Source code available. No royalties. 
EE Also from Greenled’: aaa 


The Greenleaf Functions v3.0 
The most complete, mature C language 
function library for the IBM PC, XT, AT 
and close compatibles. Includes over 225 
functions — DOS, disk, video, color text 
and graphics, string, time/date, keyboard, 
disk status and Ctrl-Break functions plus 
many more. 


The Greenleaf Comm Library 
Our 2.0 version is the hottest 
communications facility of its kind. Over 
120 functions — ring buffered, interrupt 
driven asynchronous communications for 
up to 16 ports simultaneously with 
XMODEM, XON/XOFF, many many 
sophisticated features. 


We support all popular C compilers for 
MSDOS/PCDOS: Microsoft, Lattice, 
Computer Innovations, Aztec, DeSmet, 
and others. 





COLUMNS 


C CHEST 





Subroutines with A Variable Number of Arguments 


had intended this month to carry 

on with the adaptive Huffman 
tree stuff I started two months ago. 
After spending about 60 hours work- 
ing on the code, I've finally given up. 
The paper I was working from didn't 
really provide enough information 
to implement the algorithm fully, 
and I got tired of having to decipher 
the thing. Maybe I'll pick up the pro- 
ject again at some future date, but for 
now I quit. 

So, this month’s C Chest is going to 
deal with a different topic entirely— 
subroutines with a variable number 
of arguments. I’m not going to pre- 
sent a specific program; rather, I'll 
discuss various techniques that you 
can use to write such subroutines 
and the sorts of problems your're like- 
ly to encounter. I'll discuss the ANSI 
and Unix methods for variable-argu- 
ment passing at the end of the col- 
umn. First, however, I'll look at 
what's actually going on. 


Variable Arguments 

At run time, all C subroutines use an 
area of the stack called a ‘‘stack 
frame’ to hold arguments, local vari- 
ables, and so forth. Here we're inter- 
ested in the portion of the stack 
frame used for argument passing. 
Subroutine arguments are always 
passed on the stack, and the argu- 


by Allen Holub 


ments are always pushed in reverse 


order (the rightmost argument is 
pushed first). So, for example, in call 
(of, the, wild) the variables wild, the, 
and of are pushed on the stack in that 
order. The number of bytes that are 
actually pushed depends on both the 
declared type of the variables and 


100 





the automatic-type-conversion rules: 
both signed and unsigned variables 
of type char or short int are convert- 
ed to int before being pushed. Simi- 
larly, variables of type float are con- 
verted to double. (This last automatic 
conversion is often compiler depen- 
dent, however, and can be sup- 
pressed with a function prototype). 
For the sake of the following exam- 
ples, let's assume an 8-bit char, a 16- 
bit int, 32-bit longs and floats, and a 
64-bit double. 

Let’s start with the following sim- 
ple example; its stack is illustrated in 
Figure 1, below. 


address: 


return address 





Figure 1: Stack for the subroutine 
call call( of, the, wild, 0 ): 





int of, the, wild; 


void call(int,.. .); 
of = 10; 
the = 20; 
wild = 30; 


call( of, the, wild, 0); 


The function prototype says that 
call( ) requires at least one int-size ar- 
gument, followed by any number of 
additional arguments of indetermi- 
nate type. 

The important thing to notice here 
is that, because all four arguments 
are of the same type and because 
they are at four contiguous memory 
locations, you can treat them as an 
array. 

The call( ) subroutine, shown in 
Example 1, page 102, prints any num- 
ber of arguments, terminating when 
it sees a 0 argument. Only the first 
argument is declared because that’s 
the only one you know will be pre- 
sent. The argp variable is a pointer to 
the additional arguments, which are 
treated as if they were an array of 
ints. Argp is initialized on line 6 to 
point at the first argument in the 
list—that is, &argp is a pointer to the 
first variable. It is of type pointer-to- 
int. 

In this example, &argp is the num- 
ber 102 (which is its address). From 
here on, you can treat the additional 
arguments as array elements, using 
the 0 to detect the last one. This same 
mechanism is used by several I/O li- 
brary routines, such as execl( ), 
which takes a variable number of ar- 
guments all of the same type. 

Of course, it’s often necessary to 
pass arguments of different types. 
Consider the code in Example 2, page 
103. The stacks resulting from the 
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calls to nannuck( ), on lines 35 and 36, 


are shown in Figures 2 and 3, below, 
where: 


int intvar; 
float floatvar; 


address: 


return address 


struct_type: 


struct itself: 





Figure 2: Stack resulting from the 
call to nannuck(1, 10, 20.0 ); 


address: 


return address 


structtype: 


struct itself: 


Figure 3: Stack resulting from the 


call to nannuck(2, 30.0, 40.0 ); 
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UNIX TOOLS FOR YOUR PC 





PC/vr 
UNIX’s VI Editor Now Available For Your PC! 


Are you being as productive as you can be with your computer? 
An editor should be a tool, not an obstacle to getting the job done. 
Increase your productivity today by choosing PC/VI—a COMPLETE 
implementation of UNIX* VI version 3.9 (as provided with System V 
Release 2). 

PC/VI is an implementation of the most powerful and most 
widely used full-screen editor available under the UNIX operating 
system. The following is only a hint of the power behind PC/VI: 

e Global search or search and replace using regular expressions 

e Full undo capability 

e Deletions, changes and cursor positioning on character, word, 
line, sentence, paragraph, section or global basis 

e Editing of files larger than available memory 

e Shell escapes to DOS 

e Copying and moving text 

e Macros and Word abbreviations 

e Auto-indent and Showmatch 

e MUCH, MUCH MORE! 

Don't take it from us. Here’s what some of our customers 
say: ‘Just what I was looking for!) “It’s great!’} “Just like the real 
VI! “The documentation is so good I have already learned 
things about VI that I never knew before.” — IEEE Software, 
September 1986. 

PC/VI is available for IBM-PC’s and generic MS-DOS? systems 
for only $149. Included are CTAGS and SPLIT utilities, TERMCAP 
function library, and an IBM-PC specific version which enhances 
performance by as much as TEN FOLD! 


PC/TOOLS’ 


What makes UNIX so powerful? Sleek, Fast, and 
POWERFUL utilities! UNIX gives the user not dozens, but 
hundreds of tools. Now the most powerful and popular of these are 
available for your PC! Each is a complete implementation of the 
UNIX program. Open up our toolbox and find: 


e BANNER e DIFFH e PASTE e SPLIT 

e BFS e DIFF3 e PR e STRINGS 
e CAL e GREP e RM e TAIL 

e CHMOD e HEAD e SED e TR 

e CUT e MAKE e SEE e TOUCH 
e DIFF e OD e SORT e WC 


All of these for only $49.00; naturally, extensive documentation 


is included! PC/SPELL’ 


Why settle for a spelling checker which can only compare words 
against its limited dictionary database when PC/SPELL is now 
available? PC/SPELL is a complete implementation of the UNIX 
spelling checker, renowned for its understanding of the rules of 
English! PC/SPELL determines if a word is correctly spelled by 
not only checking its database, but also by testing such 
transformations as pluralization and the addition and deletion 
of prefixes and suffixes. For only $49.00, PC/SPELL is the first 


and last spelling checker you will ever need! 
RE 

Buy PC/VI and PC/TOOLS now and get PC/SPELL for only 
S1.00! Site licenses are available. Dealer inquiries invited. MA 
residents add 5% sales tax. AMEX, MC and Visa accepted without 
surcharge. Thirty day money back guarantee if not satisfied! 
Available in 5'4”% 3'4” and 8” disk formats. For more information 
call today! 


*UNIX is a trademark of AT&T. +MS-DOS is a trademark of Microsoft. 


CUSTOM SOFTWARE SYSTEMS 
PO. BOX 678 « NATICK, MA 01760 
617 653« 2555 
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C CHEST 
(continued from page 101) 


double doublevar; 


Here you're pushing the arguments 


i: 

2: int first; 

a: ft 

4; int *argp; 

S: 

6: argp = &first ; 

iL while( *argp != 0 ) 

8: Print ("$d\n", 
Os} 


on the stack in the normal way, but 
you re treating the resulting stack as 
a structure rather than as an array. 
The first argument is used to select 
which of the two possible structures 
is being passed. Note that you can't 


| call( first ) | 


*argpt+ ); 





Example 1: The call() subroutine 


THE 150% SOLUTION 
FOR SUPERIOR 
DATABASE 
DEVELOPMENT 


AT 62% OFF. 





PHACT-manager™ gives MS-DOS™ programmers the ISAM they 
need. Plus a Report Writer, Query Language and full C source code. 


e Efficient B + Tree access method. 
© Unlimited number of keys and variable length records. 
© Security: Password protection, shared/exclusive use. 


e Runs on networks. 


e Sequel-like query language for interactive or batch 


query/update. 


© Report Writer: Perform “‘joins;’ create and use variables, 


sort, format and more. 


e Versions for all popular C compilers. 


© Thousands of licenses sold. 


To order or get more information, call us at 
1-800-222-0550 (outside NJ) or 1-201-985-8000 now. 
MasterCard/Visa accepted. 


Only $249 complete! Full C source code. 
No royalties! 


iil 
Nannnunnni 
> 


= 


Software: 


UniPress Software, Inc. 2025 Lincoln Highway Edison, NJ 08817 


MS-DOS is a trademark of Microsoft. PHACT-manager is a trademark of PHACT Associates. 
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use achar or short in either structure 
because the corresponding argu- 


ment will be converted to int as part 
of the subroutine call. By the same 
token, you can’t use a float in the 
structure because all floats are con- 
verted to doubles as part of the call. 
Also note that this method won't nec- 
essarily be portable because you 
aren't guaranteed that the fields in a 
structure are contiguous. Neverthe- 
less, it works with most compilers. 
Finally, note that you have to use a 
cast in the assignments on lines 21 
and 27 because the second argument 
is not declared as a structure. 

The main problem with the previ- 
ous example is that the number and 
types of the arguments have to be de- 
termined in advance, at compile 
time. In order to write a subroutine 
such as printfl ), which doesn’t know 
the number or types of its arguments 
until run time, you have to come up 
with a more sophisticated strategy. A 
printf( )-like subroutine that does just 
this is shown in Example 3, page 103. 
Figure 4, page 103, shows the stack 
resulting from the following call to 


fang( ): 
fang("%c, %d, %s, %f0, ‘1’, 2, "3", 4.5 ); 


The heart of this subroutine is ob- 
viously the va_arg macro defined on 
line 2. A va_arg( argp, int) call ex- 
pandis to: 


(int *(argp += sizeoflint)))[-1] 


Note that argp is a character pointer, 
so pointer arithmetic is just arithme- 
tic. That is, because the size of a char- 
acter is 1, incrementing a character 
pointer actually adds the number 1 
to the former contents. Argp starts 
out initialized to 102 (by the assign- 
ment on line 7). Because sizeoflint) is 
2, the += sets it to 104. Now you cast 
the resulting number into a pointer 
to int and index backward from it— 
that is, the expression: 


(int *(argp + = sizeof(int)))[-1] 
can be treated like this: 

int *rvalue; 

rvalue = argp; 


rvalue + = sizeof( int ); 
rvalue [-1]; 


Dr. Dobb’s Journal, August 1987 


The code advances the pointer past 
the argument on the stack and then 
backs up (with the —1) to fetch the val- 
ue. The cast to int* forces the compil- 
er to fetch an int-size argument from 
the stack. The += advances argp to 
point past this int-size argument. So, 
using this macro you can fetch any 
sort of argument from the stack, pro- 
vided that you can tell the subroutine 
what the correct type is—informa- 
tion available to both fang( ) and 
printft )in the format string. 

You could also break up the macro 
into two statements: 


char *argp; 
int xX; 


x = * (int *) argp); 
argp += sizeof int ); 


Here you Cast argp into a pointer to 


stack: address: 





format: 


args: 


Figure 4: The stack resulting from a 
fang() call 
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eee 


struct the first 
{ 
int 
double 


one; 
two; 


le 


struct the second 
{ 
double one; 
double two; 
}; 


nannuck( struct type, struct itself ) 
int struct type; 
{ 

struct the first *firstp; 

struct the second *secondp; 


if( struct type == 1 ) 
{ 
firstp = (struct the first *) &struct itself; 
printf ("%d, tf\n", firstp->one, 
firstp->two ); 
} 
else 
{ 
secondp = (struct the second *) &struct itself; 
printf ("%f, tf\n", secondp->one, 
secondp->two ); 


nannuck (1, 
nannuck (2, 


10, 
30.0, 


20.0); 
40.0 ); 





#include <stdio.h> 


#define va_arg(argp,type) ((type *) (argp += sizeof (type) )) [-1] 


fang( format, args ) 


char *format; 
{ 
char *argp = (char *) é&args; 
for(; ‘*format ; formatt+ } 
if( *format [= ‘'%' ) 
putchar( *format ); 
else 
{ 
switch( *++format ) 
{ 
case ‘c': printf ("%c", va _arg(argp,int } ); break; 
case 'd': printf("%td", va arg(argp, int ) ); break; 
case 's': printf("%s", va arg(arap,char *) ); break; 
ease 'f': printf ("%f£", va arg(argp,double) ); break; 
} 
} 
} 
} 
main () 
{ 
fang("tc, td, ts, %f\n", ‘L', 2, "3", 4.5); 


Example 3: A printf( )-like subroutine 
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C CrESI 
(continued from page 103) 


the correct type and then fetch the 
object pointed to by argp, finally ad- 
vancing argp past the object. 

ANSI (and Unix V) have formalized 
the procedures I’ve just discussed 
into a set of macros. Examples 4 and 
5, below, show fang( ) rewritten in 
both ANSI and Unix forms. The ANSI 
form is, to my mind, more readable 
than is the Unix form. For one thing, 
I don’t much like the Unix va—dcl 
macro, an invocation of which can- 


#include <stdarg.h> 


ansi fang( format ) 
char *format; 


va_list argp; 


va start( argp, 


for(> *format ;: 


if( *format {= ‘%' ) 


format ); 


not be followed by a semicolon. 
The two sets of macros are more sim- 
ilar than not, however. In fact, 
va_arg( )is identical in both systems, 
and it is identical to the one I defined 
earlier. In the ANSI system, va_Iist 
is usually defined as char *, and the 
invocation: 


va_start( argp, format ) 
usually expands to: 


argp = (char *) &format + 


sizeof(format); 


format+t++ ) 


putchar( *format ); 


else 


{ 


switch( *++format ) 


{ 

case 
_ case 
- case 

case 


‘e's printi ("tc", 
‘ad’: printi ("%d", 
ts’: printfi("%s", 
‘'£'= printl("%£", 


va arglargp,int ) ); break; 
va_arg(argp,int ) ); break; 
va _ arg(argp,char *) ); break; 
va _arg(argp,double) ); break; 





Example 4: ANSI variable-argument conventions 


j/* UNIX “7 


_/* NOTE: NO SEMICOLON PERMITTED HERE */ 


format++ ) 


01: #include <varargs.h> 

02: i. 

03: unix fang( va alist ) 

04: va dol = 

O5: £ _ 

06: char  § *format; 

07: va list argp; 

08: va_start( argp ); 

09: 

10: for( format = va arg(argp,char*); *format ; 
ii: { 

a2: 1£( “format [= ‘%' ) 
13: putchar( *format ); 
14: else 

15: { 

16: switch( *++format ) 








Be case ‘c': printf ("%c", 
19: Case “d‘: printf ("td", 
20: case ‘s': printf ("%s", 
Ol. case ‘“£': printE("sf", 
23: , 

24: } 

20: |} 


va arg(argp,int )); break; 
va_arg(argp,int )); break; 
va_arg({argp,char *)); break; 
va_arg(argp,double)); break; 


Example 5: Unix variable-argument conventions 
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That is, it initializes argp to point at 
the format argument and then ad- 
vances argp past this argument to the 
next one on the stack. The Unix mac- 
ros function in a similar manner. 


Nifty Stuff 


Curses 

Last month’s C Chest looked at a 
curses-subset package for the IBM PC. 
My implementation, however, 
lacked several useful features, such 
as overlapping windows and the 
ability to move or delete windows. It 
also couldn't handle various screen 
attributes and so forth. 

I've just come across a very nice 
implementation of the full curses 
package done by Aspen Scientific. 
The package implements all of the 
Unix functions plus a few more that 
only work in the IBM environment— 
a hundred-odd functions in all. 
These extra functions give you more 
control over clearing the screen and 
let you work with screen attributes, 
change from the monochrome 
adapter to the CGA or EGA, scroll re- 
gions of a window, and so forth. The 
package also handles the IBM func- 
tion keys in an intelligent manner. It 
can use direct memory mapping, the 
BIOS, and the ANSILSYS driver for its 
output. A Unix-style manual is pro- 
vided that’s a considerable improve- 
ment on the real Unix documenta- 
tion. There’s a page for every 
function in the package, and each 
manual page contains a €C example of 
how to use the function. Most impor- 
tant, the source code for the whole 
library is available. I don’t use store- 
bought subroutine libraries unless I 
can get the sources because without 
them my programs cannot be ported 
outside the MS-DOS environment. 

The product also comes with the 
source for a nifty screen generator 
called FAST that both provides an ex- 
ample of what the package can do 
and is a pretty useful program in its 
own right. FAST is a visual editor that 
lets you make data-entry screens in- 
teractively. It lets you define fixed 
text, the positions of various fields 
into which users can enter informa- 
tion, and the sequence of data entry. 
FAST generates a form-description 
file that is used by an interface-sub- 
routine package, also provided, that 
lays on top of curses at run time. 
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YOUR 386 





SWEAT 


LIKEA 


Push every silicon sinew to its absolute 
limits with Real UNIX 386. It'll make your 
PC run like a racehorse. Unlike DOS for 
the antique 8088, and OS/2 which will 
someday be optimized for the 80286, 
UNIX 386 was built from the ground up 
specifically for the 386 by Intel, AT&T, 
Microport. It addresses every last bit in 
the 80386. All 32 of them. All today. 

You get 80386 protected mode. And 
80286 protected mode. And 8086 emula- 
tion. And network support. And 4 giga- 
bytes of RAM including demand paged 
virtual memory. And the fastest 32-bit C, 
Fortran and Pascal compilers from Green 


Hills.** And dozens of UNIX applications. 


All right now so you can leap out ahead 
of those who wait. UNIX 386 running 
Microport DOSMERGE even gives you 





multi-user, multi-tasking PC/DOS. Up to 
33 people can run applications like Lotus 
1-2-3 and dBASE on low cost terminals 
without knowing or caring about UNIX. 

All this from the people who bring you 
the world’s fastest 286 UNIX for the IBM 
PC-AT. Need proof? Ask AIM Technol- 
ogy, the independent benchmarking ser- 
vice. They'll tell you that Microport UNIx 
screams past SCO XENIX 2.2, IBM XENIX 
System V, and the other UNIX System V 
look-alikes. 


Starting at only $199. 


Honest to AT&T UNIX from Microport, 
the leader in logically priced UNIX and 
UNIX applications. If you want to squeeze 
every bit of performance out of the 386, 


and don’t want to wait, call toll-free for 
complete information. But hurry, because 
until September 1st, every 40th caller men- 
tioning this ad and our secret code will 
receive a complete UNIX 386 product. 
ABSOLUTELY FREE. + What's the code? 
Just say “Unleash my 386.” And give us 

a little squeal. 


(800) 722-UNIX/(800) 822-UNIX in CA 


Real UNIX* $199 
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Microport Systems, Inc. 
10 Victor Square + Scotts Valley, CA 95066 
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* A real Unix System, System V 386 $199 (2 user); Software Development System $399; Text Processing System $299; Complete System $799. Limit one (1) call/winner per person/address. *AIM Technology 
benchmark, April 1987. **Green Hill Compilers 7209 Dhrystones (Interactive Systems PCC 4905 by comparison) UNIX is a trademark of AT&T. System WAT and DOSMERGE are trademarks of Microport 
Systems, Inc. Other brands and products are trademarks of their respective holders. 
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C CHEST 
(continued from page 106) 


These routines let you get data from 
specific fields, validate data, and so 
forth. 

Prices are $119 for an object-code- 
only version; $289 gets you the 
source code. A very stripped-down 
but adequate version of the Unix 
make utility is also provided. This isa 
nice product. If you need Unix-com- 
patible screen output in your pro- 
grams, or if you just want a nice 
clean window-management pack- 
age, I'd recommend it. You can con- 
tact Aspen Scientific at P.O. Box 72, 
Wheat Ridge, CO 80034-0072; (303) 
423-8088. 


MiniProbe 
It’s no secret that one of the main 
strengths of Microsoft's C compiler is 
the Codeview debugger, and one of 
the main strengths of Codeview is 
the ‘“‘tracepoint”’ (break when any of 
the following memory locations 
have changed) mechanism. For ex- 
ample, the command TPB 0 52 forces 
a break when any of the bottom 52 
memory locations in the data seg- 
ment are modified, thereby finding 
where a “Null pointer assigment’”’ ac- 
tually happened in your program. A 
problem with tracepoints, however, 
is the amount of time it takes to pro- 
cess them. The region of memory is 
inspected in software after every in- 
struction, and this inspection obvi- 
ously takes a lot of time. 

A solution to the problem is Atron’s 
MiniProbe. The MiniProbe is a short- 
slot board that plugs into your com- 


else 


{ 


else 


{ 


while ( isdigit (*Str) 


Str++; 


if(*str == 'E' || *str = ‘e' ) 


Example 6: Corrections to code in C Chest, Listing Six, February 1987 
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rval = atof ( Str ); 


puter. It provides you with four 
things: a hardware reset button, a 
“stop” button that generates an NMI 
(it can be used to break out of a loop 
when Codeview is ignoring Ctrl- 
Break), one hardware breakpoint, 
and one hardware tracepoint (that 
lets Codeview trace at full speed). At 
$395, the product is on the expensive 
side, but it really does work and is a 
godsend if you use tracepoints a lot. 
It’s also a lot cheaper than a full hard- 
ware debugger. Contact Atron at 
20665 Fourth St., Saratoga, CA 95070; 
(408) 741-5900. 


It’s no secret 
that one of 
Codeview’s 
main strengths 
is the 
tracepoint 
mechanism. 


Bug City 

Gordon Arbuthnot found four bugs 
in the expression analyzer printed in 
the February C Chest (Listing Six, 
page 64): 


1. Line 96: the declaration for con- 
stant( ) is never used and can be 
deleted. 


if( sizeof (VTYPE) != sizeof (double) ) 
_ ~&£val = (VIXYPE) atol( Str ); 


|| *Strc == *.* ) 


7* 12.34E403 */ 





2. Line 112: A test for a blank space 
(c= =’ ’) should be included here in 
case there’s leading white space. 

3. Line 231: The variable tmp should 
be declared as type VTYPE to avoid 
truncation of the intermediate 
results. 

4. Lines 301-305: I forgot about engi- 
neering notation when I wrote this 
code, so the analyzer doesn’t skip 
past stuff such as 100.5e+9 correctly. 
The corrected code is shown in Ex- 
ample 6, below. You should insert it 
in place of the code on lines 300 to 
306 of the original listing (page 67). 
The line numbers in Example 6 ref- 
erence the original listing. 


I’ve also found two bugs in the pri- 
ority-queue routines printed in the 
June 1987 issue. In pg_ins( ) (Listing 
One, line 215) change: 


| memcpy( p->bottom + = p->item- 


size, &item, p->itemsize ); 
to: 


memcpy( p->bottom + = p->item- 
size, item, p->itemsize ); 


and in main( ) (Listing One, line 386) 
change: 


i = pq_ins( queue, strsave(buf + 1)); 
to: 


p = strsave( buf + 1); 
1 = pq_ins ( queue, &p); 
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NEW—Complete source level debugging under VERSAdos 


C, FAST 








CREATE 
C6 produces superbly opti- RELOCATABLE 
mized ROMable code for 
any MC680X0 target. COMPACT CODE 
C68 includes everything you need to MC680X0 FAMILY 
create both standalone and operating 
system controlled programs. Host ver- 
sions available for your: 
MOTOROLA/VERSAdos ® VAX/UNIX ened ere ence eee ene eee eer ee 
IBM PC with PC DOS @ VAX/VMS e FULL FEATURES ° 
680X0 / UniPlus @ Complete C development environ- 


ment—full Kernighan & Ritchie 
@ Generates relocatable code 


© @ Produces ROMable code 
C, Real Time @ Double-precision floating point 


arithmetic—both software and 


phe aeeant han ng sansa anhclgiadnletecates 

aed : NEw! VERSAtarget. . . optional translator with 
operating system chosen by AT&T, —— interface libraries for VERSAdos 
Honeywell and Mitsubishi for their targets 


real-time UNIX applications. 


CALL FOR Language by 
YOUR FREE COPY— Kernighan and 


Ritchie, free 
| CY... (619) 587-1155 


5010 Shoreham Place, San Diego, CA 92122 TWX: 5106004947 


UNIX is a trademark of AT&T ¢ VAX and VMS are trademarks of Digital Equipment 
Corporation ¢ VERSAdos is a trademark of Motorola e IBM PC and PC DOS are 
trademarks of IBM Corporation ¢ REGULUS is a registered trademark of Alcyon 
Corporation ¢ UniPlus is a trademark of. Unisoft Systems. 







CIRCLE 262 ON READER SERVICE CARD 








Yes, You Should Get the Source Code 


The Austin Code Works specializes in distributing C source code. There are four 
reasons why we believe you should get the source code of any program you license or 
purchase: 


e Understanding 


If you are going to make decisions or take action based on the output of a computer 
program then you need to be able to find out exactly what the program does with 
the data you give it. You should be able to study the algorithms used by a program 
to a level of detail which satisfies your perception of what you need to know. Your 
understanding shouldn’t be constrained by what a documentation writer wants to tell 
you. There’s only one way to build rock-solid confidence in the output of a computer 
program ... study and understand the source code. 


e Modification 


You shouldn’t have to plead with the author or distributor of a program to fix bugs or 
make modifications that make the program more useful to you. There’s only one way 
you can make a program do exactly what you want it to do and not do what you don’t 
want it to do ... modify the source code. 


e Composition 


The bigger the blocks you build with the more quickly you can get done. The efficient 
and economical way to build large composite systems is to buy as many basic blocks 
as you can and write the glue code that makes them play together the way you want 
them to. There’s only one form of code block that can quickly and easily be fitted to 
custom contours ... source code. 


e Evolution 


Any piece of code is just astarting point. Whether you run it stand-alone or include it in 
a larger project, you want it to grow with you and the system you are building. There’s 
only one way to make a piece of code track your changing needs and requirements ... 
change the source code. 


With these additional opportunities comes an additional responsibility. C is a very 
portable language but considerable freedom is given to C compiler writers. The result 
is that C compilers and C runtime libraries do differ. You should not expect a piece 
of C source code to compile and run right out of the box. It may, but you should be 
pleasantly surprised if it does and not dismayed if it doesn’t. You may well have to 
lightly edit the code to satisfy the quirks and conventions of your favorite C compiler 
and its writer. Many seasoned programmers think this is a small price to pay for the 
enhanced value they get in return. 


The Austin Code Works 
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C CODE FOR THE PC 


source code, of course 
C Source Code 


FSP (screen manager) © ww. ek $400 
GraphiC 4.0 (high-resolution, DISSPLA-style scientific plots in color & hardcopy) ....... $275 
Vitamin C (MacWindows) ... 2... 1... ee ee ee ek ee $200 
Essential C Utility Library (400 useful C functions) .... 2... ... ee ee te ee $160 


Essential Communications Library (C functions for RS-232-based communication systems) . . . . $160 


Panache C Program Generator (screen-based database management programs) ......... $150 
B-Tree Library & ISAM Driver (file system utilities by Softfocus) ............... $100 
The Profiler (program execution profile tool)... 2... 2. eee ee ee te $100 
QC88 C compiler (ASM output, small model, no longs, floats or bit fields, 80+ function library) . . $90 
CBTree (B+tree ISAM driver, multiple variable-length keys)... 2... 1 eee ee ee $80 
ME (programmer’s editor with C-like macro language by Magma Software) ........... $75 
Wendin PCNX Operating System Shell .... 2... 2... 2. ew ee ee ee ee ew tk $75 
Wendin PCVMS Operating System Shell. .. ... 2... 2... we ee ee ew ew ew ew ewe $75 
Wendin Operating System Construction Kit ............2. 08080 ee ee eee eee $75 
Entelekon C Function Library (screen, graphics, keyboard, string, printer, etc.) .......... $70 
Entelekon Power Windows (menus, overlays, messages, alarms, file handling, etc.) . ........ $70 
EZ_ASM (assembly language macros bridging Cand MASM)..............e06. $60 
Make (macros, all languages, built-in rules) .. 2... 2... 2. 2 eee ee ee ee eee $50 
Vector-to-Raster Conversion (stroke letters & Tektronix 4010 codes to bitmaps) ......... $50 
Coder’s Prolog (inference engine for use with C programs) ...... 2... ee eee ee ene $45 
PC/MPX (light-weight process manager; includes preemption and cooroutine packages) ...... $45 
Biggerstaff’s System Tools (multi-tasking window manager kit) ............620008-8 $40 
TELE Kernel (Ken Berry’s multi-tasking kernel) . 2... 1. 1 1 ee ee ee ee ee we $30 
TELE Windows (Ken Berry’s window package) . . 2. 1... 1 1 ee ee ee ee ee ee ee $30 
Clisp (Lisp interpreter with extensive internals documentation) .............2eee- $30 
Translate Rules to C (YACC-like function generator for rule-based systems) ........... $30 
6-Pack of Editors (six public domain editors for use, study & hacking)... ........... $30 
ICON (string and list processing language, Version 6 and update)... ........40.-42808-4 $25 
LEX (lexical analyzer generator) . 2... 1. 1 ee et ee ee $25 
Bison & PREP (YACC workalike parser generator & attribute grammar preprocessor). ...... $25 
C Compiler Torture Test (checks a C compiler against K&R) ..........2...2..202-. $20 
PKG (task-to-task protocol package) . 2... 1 ee eee ee $20 
A68 (68000 cross-assembler) . 2. 1 1 1 1 ee ee $20 
Small-C (C subset compiler for 8080 and 8088) ....... 1... ee ee ee ee ee eee $20 
tiny-c (C subsubset interpreter including the tiny-c shell) . 2. 2... 1... ee ee ee eee $20 
Xlisp 1.5a (Lisp interpreter including tiny-Prolog in Lisp) ... 1... 1... 2. ee ee eee $20 
List-Pac (C functions for lists, stacks, and queues) «2. 1 1 1 1 ee ee ee te te ee $20 
XLT Macro Processor (general purpose text translator) 2... 6 1 6 1 ee ee ee ee ee $15 
C Tools (exception macros, wc, pp, roff, grep, printf, hash, declare, banner, Pascal-to-C) ...... $15 
Data 

Webster’s Second Dictionary (234,932 words)... 6 1 6 6 ee ee ee ee $60 
U. S. Cities (names & longitude/latitude of 32,000 U.S. cities and 6,000 state boundary points) . . . $35 
The World Digitized (100,000 longitude/latitude of world country boundaries) .......... $30 
KST Fonts (13,200 characters in 139 mixed fonts: specify TeX or bitmap format) ......... $30 
NBS Hershey Fonts (1,377 stroke characters in 14 fonts) . 2. 6 1. ee ee ee ee ee ee es $15 
U. S. Map (15,701 points of state boundaries) © 2 6 6 6 ee ee ee ee ee $15 


The Austin Code Works 
11100 Leafwood Lane 
Austin, Tezas 78750-3409 
(512) 258-0785 


Free shipping on prepaid orders MasterCard/VISA 





COLUMNS 


MS-DOS 3.30 
MA icrevets OS/2 multitasking 
protected mode operating sys- 
tem and the IBM Personal System/2 
computers captured most of the 
headlines on April 2 and afterward, 
but the upgrade to PC-DOS/MS-DOS 
3.30 that was announced at the same 
time will have a more significant 
short-term impact on users. MS-DOS 
3.30 is an evolutionary update from 
3.20, upward compatible with previ- 
ous versions, that incorporates bug 
fixes and some important enhance- 
ments. These enhancements fall into 
four general categories: new or im- 
proved user commands, configura- 
tion options, system functions, and 
device support. In addition, there is 
expanded “‘internationalization sup- 
port’ at many points throughout the 
system. The following information 
has been gleaned from the PC-DOS 
3.30 users’ manual, the technical ref- 
erence, and a limited amount of 
experimentation. 


New User Commands 

A terminate-and-stay-resident MS- 
DOS extension, NLSFUNC, is a new ele- 
ment of MS-DOS internationalization 
support and allows new code pages 
to be selected for languages other 
than American English. Code pages 
are IBM's term for resident tables that 


by Ray Duncan 


define the mapping of character 
codes for the keyboard, list device, 
and video display. 

Another TSR extension, called 
FASTOPEN, can be loaded that signifi- 
cantly improves performance for 
programs that repeatedly open and 
close a relatively small working set 
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of files. FASTOPEN apparently caches 
the directory information for the 
most recently opened files and al- 
lows actual reads of the disk directo- 
ry to be bypassed for files that are in 
the cache. FASTOPEN is active only 
for fixed disks and can support up to 
four drives; the default number of 
files cached per drive is 10, but a 
command-line option allows as 
many as 100 per drive to be cached. 

The most interesting thing about 
NLSFUNC and FASTOPEN, when 
viewed in the light of the TSR-like 
SHARE, GRAFTABL, GRAPHICS, KEYBXX, 
APPEND, and PRINT commands, 
which were added in previous ver- 
sions of MS-DOS, is the progressive 
trend toward decomposition of oper- 
ating system functionality into inde- 
pendent, selectively loadable TSR 
modules. I hope we will see this 
trend continue and even accelerate 
in future versions of real mode MS- 
DOS—it helps minimize the squeeze 
on memory in 8086/88 machines and 
provides a welcome degree of 
flexibility. 


Augmented User Commands 

The APPEND command, which is a 
passive TSR that defines a search path 
for open operations on data files 
analogous to the PATH= command 
for executable and batch files, has 
been souped up slightly. New switch- 
es cause the APPEND path string to be 
stored in the environment block and 
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allow the APPEND path to be 
searched on certain additional DOS 
function calls (11h, 4eh, and 4bh). AP- 
PEND was present in “generic” MS- 
DOS 3.20 but was previously distribut- 
ed only with networking software in 
the IBM versions. 

A BATCH file directive (CALL) has 
been added to allow one batch file to 
invoke another and then regain con- 
trol without the intermediary of a 
secondary command processor, and 
the ability to use the name of an envi- 
ronment variable as a parameter in- 
side a batch file (by framing it with % 
characters) has been documented at 
last. 

A /S switch has been added for AT- 
TRIB, which allows the command to 
also be applied to matching files in all 
subdirectories of the named or de- 
fault directory. BACKUP and RESTORE 
have new switches allowing selec- 
tion of files by their date or time, and 
the new BACKUP can format disks on 
the fly (still can’t begin to compare 
with FASTBACK, though). Other 
changes to FORMAT and GRAPH- 
ICS are too minor to discuss here. Fi- 
nally, the DATE and TIME commands 
have been spiffed up so that they can 
reset the CMOS clock on PC/ATs (no 
more rooting around for your diag- 
nostics disk with the SETUP program 
just to “spring forward” or ‘‘fall 
back’). 


New Configuration Features 
The default value for BUFFERS= has 
been made a little ‘‘smarter.” In pre- 
vious versions, BUFFERS= always de- 
faulted to 2. In MS-DOS 3.30, it defaults 
to a more appropriate value (in the 
range 2-15), depending on the type 
of disk the system is booted from and 
the amount of RAM installed. 
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MS-DOS 


as Taming MS-DOS 
by Thom Hogan 


"Taming MS-DOS takes you beyond the basics, 
_ [picking up where your DOS manual leaves off. 
You Il learn how to create a memory-resident clock, 
how to rename subdirectories and change file attri- 
butes, how to create AUTOEXEC.BAT files, and how 
to customize CONFIG.SYS and use ANSI.SYS to 
_ change the appearance of DOS. You'll find exten- 
_ sive batch file coverage with example routines that 
use redirection operators, filters and pipes, and 
ready-to-use assembly language programs that 
enhance DOS. Full source code is included. 


Taming MS-DOS Item #24-0 $19.95 
Taming MS-DOS with disk Item #59-3 $34.95 
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On Command: Writing a 
Unix-Like Shell for MS-DOS 
by Allen Holub 


his book and ready-to-use program demonstrate 

how to write a Unix-like shell for MS-DOS, with 
techniques applicable to most other programming 
environments as well. The book and disk include 
a detailed description and working version of the 
shell, complete C source code, a thorough discus- 
sion of low-level DOS interfacing and significant 
examples of C programming at the system level. 
Supported features: read, aliases, history and 
C-Shell-based shell scripts. The Unix-like control 
flow includes: if/then/else; while; foreach; 
switch/case; break; continue. For IBM PC and direct 
compatible’s. All source code included on disk. 


/Util 


hen used with the shell, this collection of util- 
ity programs and subroutines provide you with 
a fully functional subset of the Unix environment. 
Utilities include: cat; cp; date; du; echo; grep; Is; 
mkdir; mv; p; pause; printevn; rm; rmdir; sub; and 
chmod. Complete source code and manual included. 


Item #29-1 $39.95 
Item #12-7 $29.95 


On Command 
/Util 


N G 


Program Interfacing 
to MS-DOS 
by William Wong 


() riginally featured in Micro/Systems Journal, Pro- 
gram Interfacing to MS-DOS provides ten 
concise articles that will orient any experienced 
programmer to the MS-DOS environment. All source 
code discussed is also contained on disk. 


Topics include: program construction, character 
base input and output functions, and file access. 

You ll also find a discussion of CP/M style vs. Unix- 

style DOS file access, sample program files, and a 
detailed description of how to build device drivers. 

A device driver for a memory disk and a character 

device driver are provided on disk with full 

source code. 


Interfacing to MS-DOS Item #34-8 $29.95 


NR: An Implementation 
of the Unix NROFF 
Word Processer 


N R° a text formatter that is written in C and 

is compatible with the Unix NROFF It 
includes complete implementation of the -ms macro 
package, and an in-depth description of how -ms 
works. NR does hyphenation and simple propor- 
tional spacing, and supports automatic table of 
contents generation and indexing, automatic foot- 
notes and endnotes, italics, boldface, overstriking, 
understriking, and left and right margin adjustment. 
Also: extensive macro and string capability, number 
registers in various formats, diversions and diver- 
sion traps, input and output line traps. Full source 
code included. For PC compatibles. 


NR Item #33-X $29.95 


To Order: Return this order form with your payment to M&T Books, 501 Galveston Dr., Redwood City, CA 94063 
Or, Call TOLL-FREE 800-533-4372 Mon-Fri 8SAM-5PM. In CA call 800-356-2002. 


'Name___ 
Address 
Gy. State 

[_] Check enclosed. Make Payable to M&T Publishing. 
“Chargemy —« VISA [m/c 
Card No. ___ 

_ Exp. Date — 

Signature __ 


Item # 


Zip 


[_] Amer.Exp. 


Description Price 


Subtotal 
CA residents add sales tax. __% 
Add $2.25 per item for shipping 
TOTAL 


3130B. 





16-BIT 
(continued from page 112) 


The COUNTRY= directive for CON- 
FIG.SYS has been augmented with a 
code page option and with the ability 
to load internationalization informa- 
tion from a disk file. This capability 
works in concert with similar 
changes to the KEYBXX user com- 
mand and will allow support for 
new date, time, and currency for- 
mats and collating sequences to be 
added much more easily. In the past, 
the internationalization support ta- 
bles for various country codes were 
embedded inside the operating sys- 
tem; adding a new country code 
meant that the OEM had to rebuild 
the system files. 

The STACKS= directive, which 
specifies the number of stack frames 
in the system pool for use by the in- 
terrupt handler, now behaves more 
sensibly. The default for the PC, PC/ 
XT, and IBM Portable has been 
changed so that no stack switching 
occurs (the default for PC/ATs is still 9 
stacks of 128 bytes each). Further- 
more, users can always disable stack 


switching if desired by placing 
STACKS=0 in the CONFIG:SYS file. 


New System Functions 

Two new system services are avail- 
able for use by application programs, 
and the definition of IOCTL has been 
expanded slightly. Int 21h, function 
67h (Set Handle Count) allows the file 
table for a process to be expanded so 
that the process can have more than 
20 files open at once. This subject was 
nearly beaten to death in this column 
about a year ago. Most of you will no 
doubt remember that in MS-DOS, Ver- 
sions 3.0-3.2, there is a 20-byte table 
corresponding to file handle num- 
bers in a reserved area of the PSP 
along with a double-word pointer to 
the table and an additional word that 
gives the length of the table. Plenty 
of DDJ readers have already hit on 
the fact that you can get around the 
20-file limit simply by building a 
new, larger table somewhere and 
modifying the PSP words containing 
the pointer and length accordingly. 
Apparently, the new function call 
works in about the same way. It 
seems to allocate a block of memory 





UNIX-like Utilities for Managing 
C Source Code 


No C programmer should be without their 
assistant — C ToolSet. All of the utility programs 
are tailored to support the C language, but you 
can modify them to work with other languages 
too. 

Source code in standard K&R C is included; 
and you are welcome to use it with any compiler 
(UNIX compatible) and operating system you 
choose. 


12 Time Savers 


DIFF - Compares text files on a line-by-line 
basis; use CMP for byte-by-byte. Indispensable 
for showing changes among versions of a 
program under development. 

GREP - Regular expression search. Ideal for 
finding a procedural call or a variable definition 
amid a large number of header and source 
files. 

FCHART - Traces the flow of control between 
the large modules of a program. 

PP (C Beautifier) - Formats C program files 
so they are easier to read. 

CUTIL - A general purpose file filter. 


Requires MSDOS and 12K RAM 


The C Programmer's Assistant 


C TOOLSET & 


CCREF - Cross references variables used within 
a program. 

CBC (curly brace checker) - checks for pairing of 
curly braces, parens, quotes, and comments. 
Other utilities include DOCMAKE, ASCII, 
NOCOM, and PRNT. 

Source code to every program is included! 


Thorough User Support 
Text and Online 


C ToolSet documentation contains descriptions 
of each program, a listing of program options 
(if any), and a sample run of the program. 

On-line help gives you information on the 
programs and how to run them. Most of the 
programs respond to -? on the command line 
with a list of options. 


Call 800-821-2492 to order C ToolSet 
risk-free for only $95. 


solution 
ystems * 
541 Main Street, Suite 410D 


So. Weymouth, MA 02190 
617-337-6963 
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outside the process itself that is large 
enough to hold the expanded table, 
copies the old file table to the new 
one and initializes the as-yet-unused 
positions, and then twiddles the PSP 
to point to the new table. 

Int 21h, function 68h (Commit File) 
forces all the internal disk buffers as- 
sociated with a file handle to be writ- 
ten to disk and the directory infor- 
mation for the file to be updated. 
This is effectively the same as DUPing 
the handle for a file and then closing 
the new handle, except that the DUP 
method can fail if the system is out of 
handles. 

The calling sequences for the new 
functions 67h and 68h are summa- 
rized in Table 1, below. 

Int 21h, function 44h (IOCTL) has a 
new subfunction (Och) that allows an 
application program to select a dif- 
ferent code page for a peripheral de- 
vice. This is simply another facet of 
the expanded internationalization 
support. 


Device Support 

MS-DOS 3.30 supports double-sided, 
double-density, 1.44-megabyte, 3.5- 
inch disk drives and the new higher- 
resolution video adapters found on 
the IBM Personal Computer/2 mod- 
els. The built-in asynchronous com- 
munications driver has been expand- 
ed to support up to four serial ports 
and presumably is now interrupt- 
driven because the documentation 





















Set Handle Count: 
Int 21h, function 67h 





Call with: ah = 67h 
bx = desired number of handles 
Returns: Carry clear if function succeeded 
or 

Carry set if function failed and 

ax = error code 


Commit File: 
Int 21h, function 68h 


Call with: ah = 68h 
bx = file handle 





Returns: Carry clear if function succeeded 
or 
Carry set if function failed and 


ax = error code 


Table 1: New function calls in PC- 
DOS/MS-DOS 3.30 
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A TOOLBOX OF C-SOURCE CODE 
THAT LETS YOU GET YOUR 
“EGA” APPLICATION UP AND 
RUNNING QUICK! 


EGA GRAPHICS TOOLS 


INCLUDES: 


@ Lines, Circles, Circle Segments, Arcs, Squares 
and Polygons 

Mi Save/Load Screens and Windows to/from Disk 

@ Window Management, Moving Windows 

@ Color and Palette Changes 

@ Draw Axis, Plot Points 

M@ Rotates and Moves 

M@ Multiple Fonts 


B PI _ 
Boar ONLY $59.95 


Co bra Systems 


14700 Main Street, Suite 3, Bellevue, Wa 98007 — (206/641-2759 


Add $5.00 shipping & handling. Washington residents add 8.1% 
sales tax. 
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A PROGRAMMER’S 
TOOL BOX 


A DP MANAGER’S 
BEST FRIEND 


PURE GENIUS IS NOT ENOUGH 
(YOU STILL NEED THE RIGHT TOOLS) 


@ DESIGN MENUS 
@ CREATE PROTOTYPES 
@ CREATE TUTORIALS 


@ CAPTURE SCREENS 
@ CREATE DEMOS 
@ RUN TIME MODULE 


ENHANCE HIGH LEVEL LANGUAGES WITH FULL 
ACCESS TO ALL CAPABILITIES IN YOUR OWN CODE 


"source code was reduced by one third...” 

“15 minutes to design a sophisticated screen...” 
Scott McCaffrey, Musco of PA 

"In a word, fantastic...” 

”,..| just returned my copy of Dan Bricklin’s 

Demo Program.” Thomas Emr, Dir. of Marketing - ADP Inc. 


QZ 
CEnesis~ 


GA SYSTEMS 
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5403 Jonestown Rd., Harrisburg, PA 17112 
(717) 652-1200 


Rehnaa 
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INTERACTIVE ASSEMBLY AND FORTH DEVELOPMENT SYSTEM 
FOR 68000 /68020/68881 PROCESSORS 





Mach2 for Industrial OS-9/68000 


Also available for: \ndustrial Boards and Macintosh 


Full OS-9 modular programming support. 
Easy generation of program and trap modules. 
Standard infix 68000/68020/68881 assembler. 
Fast subroutine-threaded Forth 83 implementation. 


For more information, Palo Alto Shipping Company 


call or write today: P.O. Box 7430 # Menlo Park, CA 94026 
(415) 854-7994 e (800) 44FORTH 





yes!...... 


firm that can meet your needs 
across the board in software 
quality control and management! 


Who!? Software Research, Inc. (SR). 
We're the hi-tech software guality control firm. We specialize in 
services and tools devoted to software quality control. 
SR has skills and experience in: 

CL] product evaluation, testing, and enhancement 

LL] compatibility and regression testing 

LJ language validation and performance tuning 

LJ] critical applications testing 
SR’s services are top notch, based on the latest methods and 
techniques. 
SR’s tools can help you directly: 

C1) SMARTS™ to organize and run regression tests 

1) TCAT™ and S-TCAT™ to measure test completeness 

(J CapBak™ to capture and play back tests 

_) TDGEN™ to generate test cases 
SR is the pioneer in software quality. We've served business, 
research, and governments around the world since 1977. 
Interested? Call SR today for more information. Or, send us 
your business card and we'll call you! 


Software Research, Inc., 625 Third Street, San Francisco, CA 94107 
Phone: (415) 957-1441 Telex: 340-235 (SRA SFO) 
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16-BIT 
(continued from page 114) 


claims it can handle data rates as 
high as 19,200 baud. 


Prices 

PC-DOS 3.30 costs $120 new or $75 as 
an update (you have to send the cov- 
er page from the users’ manual of a 
previous version of PC-DOS along 
with the payment to qualify for the 
update). Both a 5'%4-inch and a 3%2- 
inch disk are included in the pack- 
age. The DOS 3.30 Technical Reference 
costs $85. The executable files for the 
linker, DEBUG, and EXE2BIN along 
with the source file for the VDISK 
driver are no longer supplied on the 
PC-DOS distribution disks but are on a 
disk that comes with the technical 
reference instead. 


32-Bit Book Nook 

Back when I started dabbling in 8086 
programming, the Intel manuals 
were poorly written and indexed 
and even more difficult to use than 
they are now. I eventually discov- 
ered Rector and Alexy’s The 8086 





Book, to my immense relief, and 
have well-worn copies of it stashed 


everywhere I work. Although The - 


8086 Book has a few weaknesses, 
they are far outweighed by the accu- 
racy of the book and the organiza- 
tion and presentation of the informa- 
tion about the 8086 instruction set. 
Rector and Alexy’s book is looking 
pretty dated these days, though, 
what with the many new instruc- 
tions, exceptions, and protected 
mode addressing considerations of 
the 80286 and 80386. I keep hoping 
that someone will publish an equally 
useful book that experienced pro- 
grammers can use as a reference to 
the entire family of Intel 80x86 pro- 
cessors, but thus far no new trade 
book has filled the bill. The Intel 
manuals have improved by leaps 
and bounds, and in their latest incar- 
nations are real treasure troves 
(though still somewhat dense: every 
word is significant). But the authors 
of most assembly-language books 
seem content to provide rehashed 
and weakened versions of the Intel 
manuals—they seem to have lost the 
concept of added value altogether. 


Brand New From Peter Norton 
A PROGRAMMER’S EDITOR 





that’s lightning fast with the hot 
features programmers need 


=NORTON 


‘This is the program- 
mer’s editor that I wished 
I’d had when I wrote my 
Norton Utilities. You can 





Programming the Intel 80386, by 
Smith and Johnson!, at first glance 
looked like a possible successor to 
Rector and Alexy’s book. The obliga- 
tory 20 pages of explanation of bits 
and bytes are followed by a brief 
look at the 80x86 processor line; a re- 
view of 80386 registers and address- 
ing modes; an overview of the 80386 
instruction set by functional group; 
and then the body of the book: a 180- 
page, alphabetically organized refer- 
ence to the 80386’'s instructions, in- 
cluding opcodes, clocks, flags 
affected, notes, and examples, with 
each instruction beginning on a new 
page. The last 65 pages of the book 
contain a rather sketchy overview of 
protected mode segmentation, virtu- 
al memory, paging, caching, and 
even a few words about 80386 bus 
signals. 

I really wanted to like this book, 
but it is just too uneven. The organi- 
zation (other than the main refer- 
ence section) needs improvement, 
there are literally no programming 
examples, and some crucial subjects 
(such as the distinctions between seg- 
mented virtual memory, paged vir- 
tual memory, and segmented paged 
virtual memory) just aren't covered 
in adequate depth. But the main 
problem with the book is that the au- 
thors are clearly paraphrasing their 
material from other sources instead 
of writing from a solid base of 80386 
programming experience. Without 
this experience, they simply do not 
have a sense of which material is use- 
ful and how it should be presented 
and which material (such as the 
80386 bus signals) is fluff and should 
be omitted. 

Weare now 0 for 2 on 80386 assem- 
bly-language books reviewed in this 


column (80386/80286 Assembly Lan- 
guage Programming by Murray and 
Pappas, reviewed in the March 1987 
issue of DDJ, didn’t cut the mustard 
either). At present, if you are interest- 
a ed in the 80386, your best value is still 
arg the Intel 80386 Programmer's Refer- 
: (7 ence, which is far more authorita- 
tive, readable, and thorough than 
any of its trade book competitors-- 
and cheaper besides. 


program your way to 
glory with The Norton 
Editor.” 


Bebe New 


Direct from the 
man who gave you 
The Norton Utilities, 
Inside the IBM PC, 

and the Peter Norton 
Programmer's Guide. 










EDITOR 





Word Meets Its Match 

Fred Heutte, of Portland, Oregon, 
writes: “I’m turning in the extra- 
credit question for my final exam in 


Peter Norton Computing, Inc., 2210 Wilshire Boulevard, 
Santa Monica, CA 90403, 213-453-2361. Visa, 
Mastercard and phone orders welcome. 
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Algorithm Design 101 (responding to 
Larry Heberlein in the March DDJ). 

“I am familiar with the search- 
and-replace problem in Microsoft 
Word. The particular example Larry 
Heberlein uses is a good one—it’s vir- 
tually a worst case for Word, which 
is paragraph-oriented. When you re- 
move the paragraph marks, all kinds 
of contortions result to keep track of 
the conversion. Other than this par- 
ticular case, Word’s search-and-re- 
place is very nice, and the Bellevue 
gang deserves applause for this as 
well as many other Word features. 

“T find it hard to believe that any- 
one can beat my entry, however. I 
am running INFORMIX-SOL, Version 
2.0.0 on an AT&T 6300-Plus. Informix 
has a program called SFORMBLD that 
compiles screen entry forms to be 
run under the data entry form mod- 
ule SPERFORM. When compiling a 
form file of no more than 11K, an 
‘out of memory’ error is returned. 
With DOS 3.1 taking about 40K RAM 
and SFORMBLD about 110K, this leaves 
about 490K—an approximate ratio of 
44.5:1. 

‘‘No wonder I’m pushing the orga- 
nization I work with to convert to 
Rbase System V, even though it’s not 
SOL!” 


Another Reply to Mr. Lyall 
Mr. Davidson Corry, of Seattle, Wash- 
ington, writes: “I read with some in- 
terest Mr. Charles Lyall’s letter to 
your column in the March issue on 
the continuing thrash between pro- 
ponents of assembly and high-level 
languages. 

‘As it seems to be customary to es- 
tablish one’s pedigree, let me offer 
you mine. I got my start on a Singer 
process-control machine (vintage 
early 50s) with 4K of magnetic drum 
memory in 1965. ‘Assembly’ lan- 
guage at its best—bootstrapping hex 
codes off paper tape! Since then I've 
used a dozen-odd other languages on 
two-dozen other machines, finally 
curling comfortably up beside an AT 
clone with MASM and C, consulting 
on systems programming for compa- 
nies in the Seattle area. 

“Mr. Lyall computes that a 10:1 ex- 
ecution speed ratio is compensated 
forby the 1:8 productivity increase 
of writing in a high-level language; 
that he would have to ‘run the little 
turkey 700 times’ to break even. I pic- 
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ture him sitting calmly at his termi- 
nal, waiting for a compile to 
complete, serene in the knowledge 
that the author of the compiler has 
worked productively. This is a level 
of rationality I have not reached and 
to which I do not aspire. Not me, 
babe: I want that sucker linked and 
up! Now! 

“I have equally cursed the name- 
less sculptors of silicon who—for 
perhaps excellent engineering rea- 
sons—hobbled the 8086 with short- 
range conditional jumps and saddled 
programmers with the jump around 
a jump. However much it simplified 
their job, it has made mine that much 
more difficult. 

“This is, I think, the central issue in 
the language-level debate: the ulti- 
mate judgment on software is on its 
effectiveness (speed, power, fea- 
tures, and so on) as a tool for end-us- 
ers. The difficulties of engineering 
the tool are, in the end, irrelevant. 
The only justification, and it is a 
weak one, for taking ‘shortcuts’ is 
that a good tool today is more useful 
than a superb tool next year. 

“To my mind, there are only two 


values of execution time: ‘fast 
enough not to notice’ and ‘slow 
enough to get impatient.’ No one has 
reasonably suggested that a well-cod- 
ed, high-level program can beat a 
well-coded, assembly-language one 
for time, and my experience suggests 
that assembly-language code is much 
more likely to fall on the good side of 
the ‘come on!’ threshold. So I often 
write in assembly language, for 
speed, compactness, and close con- 
trol of the hardware. It’s not porta- 
ble, you say? Yes, but a program that 
works with my PC keyboard and 
screen probably isn’t going to fit in 
the CICS mindset anyway. 

“Having said that, I will tell you 
that I much prefer high-level lan- 
guages and use them whenever I can 
get away with it—that is, whenever 
the hardware penalty is not too dear. 
This does not contradict my argu- 
ment—it confirms it. Let me explain. 

“Assembly language, however ef- 
ficiently it tickles the chip, is a pain to 
write and debug. It is cryptic, te- 
dious, verbose—even COBOL is better! 
By its very flexibility it encourages 
all sorts of ‘gimmick’ coding (‘Fly 


The Advanced Programmer's Editor 
That Doesn't Waste Your Time 


e Fast, EMACS-style commands—completely reconfigurable 
e Run other programs without stopping Epsilon—concurrently! 


e C Language support—fix errors while your compiler runs 


e Powerful extension language 
e Multiple windows, files 


e Unlimited file size, line length 
e 30 day money-back guarantee 


Only $195 
LUGyar~u 


Software Ltd. 


5740 Darlington Road 
Pittsburgh, PA 15217 








e Great on-line help system 
e Regular Expression search 
e Supports large displays 

e Not copy protected 


for IBM PC/XT/AT’s or compatibles 
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now, crash later ...’). And the typi- 


cal assembly-language source listing 
almost totally obscures the underly- 
ing algorithm. 

“In contrast, my favorite language 
these days is ICON. It is no speed de- 
mon, and makes no claims to be, but 
it is a superb notation for recording 
an algorithm. The most difficult part 
of learning ICON seems to be unlearn- 
ing coding practices that got you 
around limitations in other lan- 
guages so that you can see the prob- 
lem fresh and use the power of ICON 
expressions. 

‘““C—the ‘portable assembly lan- 
guage —was designed to let pro- 
grammers access a pervasive archi- 
tecture efficiently: linear/rectilinear 
arrays of machine objects (bytes/ 
words/longs/floats/doubles/point- 
ers) or agglomerations of them. The 
‘overhead’ of compiled C varies as 
the CPU architecture drifts from this 
ideal, but C may be near ultimate in 
letting programmers talk the chip’s 
language comfortably. 

‘‘Does anyone remember UCSD Pas- 


Free Trial Disk 


C-INDEX 


@ Fast B+Tree Access 
@ Multi-Key Indexing 
@ Variable Length Records 


“The C-—Index package is the finest C language library that I 
have worked with. The design of the package is excellent in 
terms of functionality, ease of use and portability”. 

Dale Chamberlain, Professional Drug Systems 


“I admire the work you have done with C-Index. HadI known 


® Record Locking 
@ Automatic Buffering 
@ Portable Source Code 


cal, running on a p-machine? No, not 
the software emulator—I mean the 
real Western Digital p-machine in sil- 
icon. It screamed, or so they said. 
How about Modula-2 on Wirth’s Lil- 
ith? And whatever happened to the 
Forth chip set that executed Forth 
primitives directly? These are at- 
tempts to make the chip talk the pro- 
grammer'’s language. 

‘And that brings us full circle. En- 
ergy spent engineering hardware so- 
lutions is repaid a thousandfold at 
the next higher level—because that 
many more people use it. If a thou- 
sand people run Mr. Lyall’s ‘little tur- 
key, every one of them loses ground 
on the very first run. 

“The ‘debate’ over high-level-lan- 
guage efficiency is an artifact of 
adapting human language to ma- 
chine architecture, a historical acci- 
dent. I suggest that a better solution is 
to design notations in which humans 
can clearly and conveniently express 
algorithms and then adapt the ‘hard- 
ware’ (RISC chips with a micropro- 
grammed icing, better compilers and 
operating systems, and so on) to exe- 
cute these improved notations 
efficiently.”’ 


$39 
24 hour 


level 
sheets 


ent menus, 


$99 PC 


Transfers: 
TLX/TWX. 


about your product when I was designing dBASE III, I would 


have certainly used it” 


COMMX 


Emulates: V1T19@/182,Wyse,HP,ADM, TV, IBM, ADDS 
KERMIT, XMODEM, COMMX mainframe, 
POPUP hotkey to DOS or programs. 
Unattended control scripts, 
for 79% entries & electronic mail features. 


Mahalo and Aloha 

Every good thing must come to an 
end, and although I have enjoyed 
writing this column and have 
learned far more from DDJ’s readers 
than they have learned from me, 
five years of a Good Thing is definite- 
ly enough. The siren song of the fab- 
ulous new class of 32-bit personal 
computers, like the Mac II and the 
PS/2 Model 80, is becoming irresist- 
ible, and I’ve got a lot of delving to do 
before I can write about those ma- 
chines intelligently. In the mean- 
time, I wish you all continued health, 
prosperity, happiness—and a ma- 
chine with a BIG fixed disk, tape 
backup, and no-wait-state RAM! 


Note 

1. Bud E. Smith and Mark T. Johnson, 
Programming the Intel 80386 (Glen- 
view, IIl.: Scott, Foresman & Compa- 
ny, 1987. 346 pages including index. 
$22.95. ISBN 0-673-18568-0. 


DDJ 
Vote for your favorite feature/article. 
Circle Reader Service 6. 


BUSINESS BBS 


business information 
modem (398-2499 baud). 
data 
easily with no 
Integrated data base, 
remote PC operation. 


center via 
Setup custom multi- 
entry forms and  info- 

programming req’d. 
XMODEM up/downloads, 
With source code $249. 


$119 CP/M 


dial directory 


sss C DATA ENCRYPTION 


Wayne Ratliff, Author of dBASE II and dBASE IlII¢ 


C-—Index/Plus 
C-—Index/File 


$395 
$99 


Trio Systems 


2210 Wilshire Blvd. Suite 289 Santa Monica, CA 90403 


213/394-0796 
+ dBASE II and dBASE III are trademarks of Ashton-Tate 
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Full Source Code 
Object Code Only 
Free Trial Disk, includes libraries for Lattice and Microsoft compilers 


Data 


or service. 


Lf) 


£ 2, 
ae 


Encryption Standard (U.S. 
Standard FIPS PUB4S6) in 
Includes compression & telecomm formatting, 
allowing faster transmission & less storage 
space plus compatibility with any 


government 
Microsoft "C", 


computer 


Complete "C" source code $249. 


iW HAWKE YE 
(Ay. GRAFIX Inc 


BOX 1488, OLDSMAR 
FLORIDA 353597 
DIAL 813-855-5846 
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MICROWAY ACCELERATES YOUR PC! 





FastCACHE-286" 


Runs your PC Faster than an AT! 
Runs the 80286 at 9 or 12 MHz and the 
80287 at 8, 9 or 12 MHz. Includes 8 
kbytes of 55ns CACHE. 





Compatible with IBM PC, XT, Leading 
Edge Model D, Compaq, and Turbo 
motherboards. Includes 8088 Reboot 
Switch, DCache, Print Spooler and 
Diagnostics .............. From $399 


8087 SOFTWARE 











IBM BASIC COMPILER ......... $465 
MICROSOFT QUICK BASIC ...... $79 
87BASIC COMPILER PATCH ....$150 
STBASIC/NILING visceeawig aeded $200 
IBM MACRO ASSEMBLER ...... $155 
MS MACRO ASSEMBLER ........ $99 
87MACRO/DEBUG ............. $199 
MICROSOFT FORTRAN V4 ..... $299 
RM FORTRAN oc oeecwcsecv ena $399 
LAHEY FORTRAN F77L......... $477 
MS or LATTICE C .............. CALL 
STSC APL&PLUS/PC .......... $450 
STSC STATGRAPHICS .......... $675 






Turns your AT into a high speed, multi-user 
Xenix business system! 













8 port, intelligent serial controller with 3% 
response degradation. Includes 8 MHz 
80186 with builtin DMA........ $1299 


: 
Micro:22”.. 


Wa 02364 USA 
YY CRANE CHATS 


LOTUS/INTEL EMS 
SPECIFICATION BOARDS 


MegaPage"™ The only EMS board which 
comes populated with two megabytes of 
cool-running, low power drain CMOS 
RAM installed. Includes RAM disk, print 
spooler, disk cache and EMS drivers. For 
the IBM PC, XT and compatibles. . .$549 


MegaPage with OK ............ $149 
MegaPage with 2 megabytes of HMOS 
RAI tac bchvnsdaaeees clocueeus $419 


MegaPage AT/ECC™ EMS card for the 
PC AT and compatibles includes Error 
Correction Circuitry. With ECC, 11 RAM 
chips cover 256K so the user never en- 
counters RAM errors. With 1 megabyte 
CMOS RAM ..................- $699 
INTEL, JRAM, or Maynard ....CALL 
INTEL INBOARD 386 OK ..... $1250 


“* wean 4 


St eS 


_ software compatibility. 


PC Magazine “‘Editor’s Choice” 


MICROWAY SOFTWARE 
FOR LOTUS 1-2-3" 


PowerDialer® Add-In for Lotus 1-2-3 
Release 2. Automated telephone dialing 
from within 1-2-3. Adds least cost routing, 
automatic carrier selection and automated 
phone book worksheet. Builds cus- 
tomized dialing applications. Can be used 
with DesqView...............655- $79 
FASTBREAK™ employs the 8087 to in- 
crease the speed of Lotus 1-2-3™ Version 
1A or 1A*. Users are reporting speed ups 
of between 3 and 36 to 1. When run with 
our NUMBER SMASHER accelerator 
card, recalculation speed ups of 10 to 30 
are being reported $79 
HOTLINK™ adds easy linking of spread- 
sheets to Lotus 1-2-3 Version 1A...$99 


CALL (617) 746-7341 FOR OUR COMPLETE CATALOG 


The World Leader 
in 8087 Support! 
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_ 287Turboruns the 80287 at 
— 100r 12 MHzinthe IBM PC 
_AT, compatibles and the 
~ new Compag 386 with 100% 




























NUMBER 
SMASHER/ECM™ 


Triples the speed of CAE 
and all applications! 


From 


$599 














12 MHz 
8086/8087 
Accelerator 
Plus 
A Megabyte for DOS! 
For the IBM PC, XT and compatibles 


PC Magazine “‘Editor’s Choice”’ 


8087 UPGRADES 


All MicroWay 8087s include a one year 
warranty, complete MicroWay Test 
Program and installation instructions. 




























































80287-6 6 MHz............... $179 
For 8 MHz AT and compatibles 

80287-8 8 MHz............... $259 
For the 8 MHz 80286 accelerator cards 
80287-10 10 MHz............ $395 


64K 150ns ..... $15 256K 150ns..... $36 
Call for great prices on V20 & V30 











287 TURBO-PLUS™ 


Speeds up your AT 
Adjustable 80286 Clock 6-12 MHz 

10 MHz 80287 Clock 

Plus Full Hardware Reset ........ $149 
Optional 80286-10 ...... $175 | 


















287TURBO-PLUS 
With: 80287 10 MHZ .0c.2220..000. $549 
With 80287 12 MHz ............ $629 





MicroWay Europe 

32 High Street 

Tate f-) Colaba ©) ole) num Mal-Tant=s-) 
Surrey England KT1 1HL 
Telephone: 01-541-5466 








Ten Reasons Not 





T | don’t like working with 
e others 

PeaceNet is a computer network and communication 
system for people who believe that global planning 
and cooperation are necessary to reverse a trillion-dol- 
lar-per-year arms race; it is linking users throughout 
the United States and in over 70 other countries. 


I’ve got all the information I'll 
eever need 
PeaceNet is for those who appreciate that information 
is always growing and changing; its bulletin boards, 
conferences, and databases provide information about 
everything from Central America to Star Wars. 


2 | love playing phone tag 


@ PeaceNet’s electronic mail system renders those 
endless conversations with secretaries and answering 
machines obsolete. 


| don’t know how to use my 
e computer 


PeaceNet helps novices with simple, entertaining man- 


uals and round-the-clock staff for answering their 
questions. 


5 | enjoy copying, labeling, and 
e stamping letters 

PeaceNet enables you to send messages to hundreds of 
other users with one simple command. 








I’ve got plenty of money 
eto waste on postage and 
phone bills 
PeaceNet is for people who want to save money; it let: 
you send documents across the world faster than 
Federal Express™ for pennies per page. 


| don’t mind getting action 
ealerts a week late 

PeaceNet does mind and can help your organization 
send out time-urgent alerts instantly. 


| don’t have the right kind of 
e computer equipment 
PeaceNet is available to anyone with a computer term 
nal and a modem. 


An effective peace movement 
eisn’t worth 50 cents a day 
PeaceNet users disagree. 


T It’s all hopeless, anyway 
@ [hen why read this magazine when Moderr 
Wrestling would suffice? 

















Nearly a thousand people and fifty groups are already 
using PeaceNet, including Beyond War, the National 
Freeze Campaign, and Nuclear Times. If you want to joi 
them in an unprecedented international dialogue for 
peace, write or call us today for details. 





& PeaceNet: 





The First Global Computer Network for Peace 
@ 1918 Bonita, Berkeley, CA 94704 (415) 486-0264 


FLOPPY DISK. . 
Fills time between coffee breaks == —> 
Makes a hard disk seem fast _ : 


Your computer appears busy 
(even if you aren’t!) 


Wears out moving parts 


..for YOUR demanding tasks. 


SURPRISE! Neither is memory mapped, so they don’t 
affect your precious Main Memory. Both retain data indefi- 
nitely - even with the computer turned off. 


THE SEMIDISK SOLUTION. You could invest in a 
series of “upgrades” that turn out to be expensive band-aids 
without solving your real problem. Even those “Ac- 
celerator” and “Turbo” boards do little to speed up disk- 
bound computers. If your applications spend too much time 
reading and writing to disk (and whose don’t?), you won’t 
want to settle for anything less than a SemiDisk disk 
emulator. The SemiDisk comes in 512K and 2Mb capacity. 
More boards may be added to make up to an 8 Megabyte 
SemiDrive! 

SPEED THAT’S COMPATIBLE. PC, XT or AT, if you 
need speed, the SemiDisk has it. How fast? Recent ben- 
chmarks show the SemiDisk is from 2 to 5 times faster than 
hard disks, and from 25% faster (writing) to several times 
faster (random reads) than VDISK and other RAMdisk 
software that gobble up your main memory. 

MEMORY THAT’S STORAGE. Using our small exter- 
nal power supply, with battery backup, your data remains 
intact through your longest vacation or even a seven-hour 
power failure! 


ee VISA 
wun 


ae 


SEMIDISK Disk Emulator. 
Gets that job done NOW 
Makes a hard disk seem slow 


Maximizes your productivity 
with anything from databases 
to compilers 


Totally silent operation 





CELEBRATE WITH US! Now, SemiDisk celebrates its 
fifth birthday with a special offer for IBM-PC owners. Buy 
a SemiDisk now and we’ll include an 8 MHz V-20 micro- 
processor (replaces the 8088) to make your new SemiDisk 
run even faster. Don’t need the V-20? We’ll take $20 off 
the price of your Battery Backup Unit! 


512K 2Mbyte 
IBM, PC, XT, AT $495 $ 795 
Epson QX-10 $495 $ 995 
S-100 SemiDisk II $795 $1295 
S-100 SemiDisk I $299 ww neennnnnnee 
TRS-80 II, 12, 16 $495 $ 995 
Battery Backup $130 $ 130 


Someday you’ll get a SemiDisk. 
Until then, you’ll just have to...wait. 


SemiDisk 


SemiDisk Systems, Inc., 11080 S.W. Allen Blvd., Beaverton, Oregon 97005 (503) 626-3104 


CIRCLE 85 ON READER SERVICE CARD 





COLUMNS 





STRUCTURED PROGRAMMING 


Translating from MS-BASIC to C 


if this issue I discuss translating 
programs from BASIC to C. This ar- 
ticle is the third in a series that looks 
at translating programs between dif- 
ferent languages or dialects of the 
same language. As in the previous ar- 
ticles in the series, I have used a lan- 
guage translator. I will also discuss 
the translation performed by BASTOC 
(Version 2.1), a package from JMI Soft- 
ware (P.O. Box 481, Spring House, PA 
19477). The version I used converts 
MS-BASIC source code to C source 
code compatible with Microsoft C, 
Version 4.0. Versions of BASTOC are 
available to translate from several 
other BASIC dialects, such as CBASIC, 
too. 

To guide the discussion, I have se- 
lected three programs: the Sieve 
benchmark, a root-seeking program, 
and a multifile find/replace utility. I 
have actually translated many other 
BASIC programs to test how well BAS- 
TOC works, and the results have 
shown that the package’s source 
code conversion is well thought out 
and comes close to being a complete 
translation. The converted programs 
kept much of their feel but ran much 
faster. 


The Sieve Benchmark 
Listing One, page 86, shows the BASIC 
source code for the Sieve bench- 


by Namir Clement 
Shammas 


mark. The program demonstrates 
the conversion of arrays, FOR and 
WHILE loops, and IF statements. List- 
ing Two, page 86, shows the C ver- 
sion of the BASIC source code. The 
first BASIC statements are OPTION 
BASE and DEFXxXx. BASTOC ignores OP- 
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TION BASE 1 declarations because the 
C language implicitly uses 0 as the 
lower array bound. Thus, OPTION 
BASE 1 creates a bit of wasteful space 
when translated. BASTOC uses DEFXxx 
statements well to assign a data type 
to the BASIC variables. Because the 
BASIC Sieve program makes the DEF- 
INT A_Z declaration, the C version 
declares all the inherited variables as 
int. Notice that the array flag is re- 
placed with a pointer to integers, 
“FLAGS, because the dimensioning of 
the array flags uses a variable and 
not an integer constant. This dictates 
the use of dynamic allocation and 
pointers. The BASTOC translator de- 
clares additional identifiers that it 
uses in controlling loops. The simple 
BASIC assignments are converted in a 
straightforward fashion. DIM FLAGS 
(SIZE) yields a dynamic allocation of 
the array using the balloc function. 

The few BASIC PRINT statements 
are not converted into printf func- 
tion calls, as you might have expect- 
ed. Instead, BASTOC uses its own over- 
loaded BPRINT( ) function (which I 
presume is more efficient than 
printf). Examine the three BPRINT 
calls in the C code and notice the first 
argument. It is a string that maps the 
number and type of data to be dis- 
played. The letters s and i indicate a 
string and an integer, respectively. 
The function BPRINT is able to tackle 
a varying number of arguments. 

The manipulation of time is car- 

















ried out using a function that sets the 
time—namely, STIME_( )—and an- 
other—TIME_( )—to return it. 
Because C has more options than 
MS-BASIC does, translating the FOR 
and WHILE loops is easy. Notice that 
the C version uses additional identifi- 
ers to define the iteration range of 
the FOR loops. The single IF state- 
ment that uses a GOTO in its THEN 
clause is converted into a similar set 
of statements. The BASTOC translator 
makes use of the available gotos in C 
rather than trying to alter the pro- 
gram flow by using other constructs. 
You can replace the use of the gotos 
with more structured if... else 
clauses if you are willing to hand 
code the changes with your editor. 


The Root-Finding Program 
The second program, which finds 
the roots of a single nonlinear func- 
tion, is in Listing Three, page 87. It 
has the following features: 


e Using the ON GOSUB statement, the 
program can look at multiple 
functions. 

¢The accuracy and maximum num- 
ber of iterations are preassigned. If 
the number of iterations exceeds the 
maximum limit, the accuracy is 
relaxed. 


This program demonstrates the con- 
version of BASIC DATA, ON GOSUB, GO- 
SUB, and PRINT USING statements. 
Listing Four, page 87, shows the 
translated C code. The first declara- 
tion tackles a data structure that is 
employed in converting BASIC DATA 
statements. The C structure is com- 
posed of an unsigned integer and a 
pointer. The integer stores the origi- 
nal BASIC line number, and the point- 
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Easy access to free software, 
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Introductory Usage Credit when 

you purchase your CompuServe 
Subscription Kit. 


Information you just can’t find 
anywhere else. 


Use the Forum Message Board 
to send and receive electronic mes- 
sages. Join ongoing, real-time 
discussions in a Forum Conference. 
Communicate with industry experts, 
including the programmers who 
write your favorite programs. Search 
Forum Data Libraries for non- 
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like electronic editions of popular 
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STRUCTURED PROGRAMMING 
(continued from page 122) 


er refers to a string containing the in- 
formation contained in a BASIC DATA 
statement. The original BASIC line 
numbers are maintained in the data 
structure to accommodate the RE- 
STORE <line number> statement in 
BASIC. The transformed program 
also declares the absolute, exponen- 
tial, and power functions that must 
be called from C libraries. 

Notice that the first two lines of the 
BASIC program are the DEFDBL and 
DEFINT declarations. Line 1010 was 
originally DEFDBL A_Z, but the trans- 
lator objected to the redefinition of 
the I/O range in line 1020. All the BA- 
SIC variables except the integer flag 
Diverge% adhere to the default type- 
by-name association. The BASTOC 
translator handles the data typing of 
variables correctly. Notice that the 
BASIC Diverge% variable is converted 
into divergel in C: the uppercase I re- 
places the % character in BASIC. 

The BASIC INPUT statement is con- 
verted into a call to an overloaded C 
function, INPUT( ). Like the BPRINT( ) 
function discussed earlier, the first 
argument of JNPUT( ) is a string that 
seems to determine if a prompt is 
used as well as to indicate the data 
type of the input. Like the familiar 
scanfl ) function, INPUT( ) uses the 
address of the variable to store the in- 
put data. The BASIC READ statements 
are translated into function calls that 
are similar to the BPRINT( ) and IN- 
PUT( ) functions. 

Translating the BASIC lines that 
make up the iteration loops takes 
place without snags. Looping with 
the WHILE-WEND and the IF state- 
ments is correctly converted. The GO- 
SUB 1200 statements are replaced 
with calls to function pr_—1200( ). Be- 
cause GOSUBs take no parameters, 
their counterparts in C are always 
parameterless functions. If you use 
BASTOC to translate your own BASIC 


programs into C, you may want to | 


edit your program to take advantage 
of using argument lists in C 
functions. 

PRINT USING statements are trans- 
lated into UPRINT( ) function calls. 
These C functions resemble their 
BPRINT( ) cousins, except the first ar- 
gument is the output format string 
and the second argument contains 
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the number and data types for the 
output variables. 

The MS-BASIC subroutine that starts 
at line 1200 uses the ON GOSUB state- 
ment to call other subroutines. The 
ON GOSUB is translated into the C 
switch-case decision-making con- 
struct. The variable used in selecting 
the proper case is the global n identi- 
fier. The C function pr—1200( ) ends 
with a return with no expression as- 
sociated with it. The same is true for 
the rest of the subroutines. 


The Find/Replace Utility 
The third example program is 
shown in Listing Five, page 89, and 
Listing Six, page 90, shows the C ver- 
sion. The BASIC program performs 
find/replace operations on one or 
more files. This program demon- 
strates the translation of sequential 
file I/O, string manipulation, and er- 
ror handling. 

In comparing the BASIC declara- 
tions in lines 1040 to 1070 with those 
in the C version, notice the following: 


¢The effect of OPTION BASE 1 is ig- 
nored, and BASIC dimensions of 20 
and 30 elements are replaced with 21 
and 31 elements. The first array ele- 
ments, with an index of O, are not 
used. 

¢DEFINT A_Z is used to tell BASTOC 
how to declare the data types of sca- 
lar variables in the C program. The 
underscore character replaces the 
dot used in the BASIC variable names. 
¢String-type scalars and arrays are 
declared as pointers. 


The first set of statements inside 
the main( ) function allocates space 
to the string arrays using the corre- 
sponding pointers. The assignments 
to integer variables are straightfor- 
ward. String assignment involves a 
call to function s_asgn( ) instead of 
an ordinary assignment as in BASIC, 
Turbo Pascal, or Modula-2. 

What is even more unusual is the 
way the GOSUB 2290 is handled: in- 
stead of yielding a call to function 
pr_—2290( ), two statements are used. 
The first is sub_push(1) and the sec- 
ond is a goto. Has the BASTOC transla- 
tor finally collapsed under pressure 
and continuous use? No, there is no 
need to panic! This sort of code seems 
to be generated when the BASIC ON 
ERROR is used. If you look at the C la- 











bel L_2290, you see a goto sub_ret, 
which directs the program flow to 
the correct label. Although this may 
remind you a bit of spaghetti BASIC 
code, no one said that translating er- 
ror handling from one language to 
another was easy! The large number 
of labels and gotos is the result of sup- 
porting BASIC’s error handling. The 
BASTOC translator resorts to defen- 
sive programming to cover any er- 
rors generated from numerous lines. 
Three additional code segments are 
inserted by BASTOC to handle errors, 
each starting with a label. The first is 
sub_ret, mentioned earlier, which is 
responsible for simulating gosub re- 
turns when error handling is used. 
Label err_trap is where the program 
flow first resumes after an error oc- 
curs. From label err_trap the pro- 
gram flows to the error-handling 
routine inherited from the BASIC 
source code. In this example, the BA- 
SIC error handler starts at line 1750, 
and consequently, the C version re- 
sumes at label L_1750. Notice that the 
transformed BASIC error-handling 
code ends with a goto un_trap to re- 
sume program execution. The code 
segment following the un_trap label 
contains a switch-case with a long list 
of case clauses to direct the program 
resumption. 

File I/O operations in the C version 
resort to calling several functions 
that emulate their corresponding BA- 
SIC statements. These include func- 
tions BOPEN( ), BCLOSE( ), INPUT( ), 
and BPRINT( ). The use of the last two 
functions has been extended to in- 
clude file I/O. The first two argu- 
ments of JNPUT( ) are a string-type 
file I/O indicator and the buffer 
number. The BPRINT( ) function call 
performing file output differs from 
the one involved in displaying a vari- 
able by having the buffer number as 
the first argument. The rest of the ar- 
guments are the same, as you might 
expect. The BASIC LPRINT statements 
are replaced with calls to the C func- 
tion BLPRINT( ). The BLPRINT( ) func- 
tion is to the BPRINT( ) function as BA- 
SIC’S PRINT is to LPRINT. 

String manipulation involves calls 
to functions that clone BASIC string 
functions, such as MID$(_), LEN( ), and 
INSTR( ). String concatenation em- 
ploys the function s_asgn( ), follow- 
ing typical methods used in C for 
string management. 
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c-tree: Multi-Key ISAM Functions 
For Single User, Network, & Multi 
Tasking Systems 
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STRUCTURED PROGRAMMING 
(continued from page 124) 


Summary 

Converting interpreted MS-BASIC pro- 
grams to run as compiled C programs 
has limitations. Many of these limita- 
tions exist because of the compiled 
nature of the functioning C ver- 
sions—for example: 


¢ CHAIN is translated by BASTOC into a 


program execution that doesn't re- 
turn to the original program. 

¢ COMMON declarations must be iden- 
tical in the chained BASIC programs. 
e PEEKS, POKES, VARPTR, and USR are 
not supported for the C and L memo- 
ry models. 


Translating BASIC programs into C 
enables your programs to gain the 
speed of compiled programs. The al- 
ternative is to use a BASIC compiler to 
attain the desired speed. Why go the 
C route instead of the QuickBASIC or 
Turbo BASIC way? Transporting BA- 
SIC programs to C for the sole pur- 
pose of gaining speed may be over- 
kill. The advantage of translating 
BASIC programs is that C programs 
can be modified to use more popular 
libraries, and more important, they 
can be enhanced by linking them 
with third-party C libraries. This en- 
ables you, for example, to incorpo- 
rate more elegant windowing rou- 
tines in your programs. Also, your 
programs will be able to make use of 
C’s efficient pointer manipulations, 
data structures, enumerated types, 
unsigned integers, long integers, and 
more. 


Availability 

All the source code for articles in this 
issue is available on a single disk. To 
order, send $14.95 to Dr. Dobb’s Jour- 
nal, 501 Galveston Dr., Redwood City, 
CA 94063, or call (415) 366-3600, ext. 
216. Please specify the issue number 
and format (MS-DOS, Macintosh, 
Kaypro). 


DDJ 
(Listings begin on page 86.) 


Vote for your favorite feature/article. 
Circle Reader Service No. 7. 
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and documentation will save you hours develop- 
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TURBO Complex provides procedures for perform- 
ing all the arithmetic operations and necessary real 
functions with complex numbers. Each procedure 
is based on predefined constants and types. By 
using these declarations the size of arrays are easily 
adapted. Each type declaration is a record with 
both a real and imaginary part. Use these pro- 
cedures to build more sophisticated functions in 
your own programs. 
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his month I'll continue my eval- 

uation of the Xerox 1186 LISP 
machine with an in-depth discussion 
of LOOPS, the object-oriented AI pro- 
gramming environment that runs on 
this machine. LOOPS was developed 
at Xerox PARC, and the first version 
was released in 1983. The principal 
designers of the original LOOPS sys- 
tem were Dan Bobrow and Mark Ste- 
fik. LOOPS has just recently been re- 
leased as a commercial product and 
is an important addition to available 
expert system tools and AI develop- 
ment environments. 

Before going into some of the de- 
tails of LOOPS, I would like first to de- 
scribe just what sort of an AI pro- 
gramming environment this is and 
what its overall significance might 
be. But first, I should remove one 
source of confusion—LOOPS is not 
the same thing as CommonLOOPs. 
The latter is a low-level, object-ori- 
ented extension to Common LISP 
whereas LOOPS is a high-level, AI lan- 
guage that already has most of the fa- 
cilities needed for developing ad- 
vanced AI applications. 

As with most AI systems, LOOPS 
supports rule-based programming. 
What makes LOOPS unique, howev- 
er, is its complete implementation of 


by Ernest R. Tello 


an object-oriented programming en- 
vironment. The language contains 
just about all that was valuable and 
important in Smalltalk as well as 
much else besides. LOOPS was the 
tool used to create the PRIDE expert 
system developed by Sanjay Mittal, 
which I described in my first column 
(see DDJ, February 1987). It is already 
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apparent that some new paradigms 
for expert system development have 
emerged as a result of various pro- 
jects using LOOPS. 

One of the central ideas in the de- 
sign of the LOOPS environment was 
to provide an AI programming sys- 
tem that would support a multiple- 
paradigm framework. The current 
system supports four main program- 
ming paradigms: the object-oriented 
paradigm, the rule-based paradigm, 
the access-oriented paradigm, and 
the normal procedural paradigm. 


Classes and Instances 

As with all object-oriented program- 
ming systems, LOOPS provides for 
building hierarchies of classes and 
instances of those classes. Let’s first 
look at the simple syntax used for ac- 
cessing objects. The way you would 
reference a user-defined class called 
Partnership, or any other class, 
would be: 


($ Partnership) 


The dollar sign means that the object 
pointer to the Partnership structure 
is to be referenced. All references to 
objects in LOOPS use this convention 
of preceding the name of the object 
with the dollar-sign character. 
Another syntax convention used in 
LOOPS is the back-arrow character, 
which I represent as <-. This char- 
acter is accessed on the standard key- 
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LOOPS 


board of the 1186 with the under- 
score key. The <- character 
translates roughly as ‘“‘send the mes- 
sage’ and corresponds to message in 
Flavors or send in SCOOPS (the object- 
oriented extension to PC Scheme). So, 
the LOOPS expression: 


(<—($ Partnership) New ‘OurVenture) 


would send the message New to the 
Partnership class to create a new in- 
stance of itself called OurVenture. 

Much of the activity in developing 
LOOPS applications involves the use 
of its rich variety of window- and 
menu-based tools, such as browsers 
and editors. 


LOOPS Browsers 

Software, as most programmers real- 
ize, is developed in layers, or shells, 
of functionality. All the major ad- 
vances in software engineering coex- 
ist in some form, like different layers 
of an onion or rings of the trunk of a 
tree. LOOPS and the 1186 are both fine 
examples of this organic evolution in 
the AI field. The high-level tools that 
are provided with LOOPS offer an AI 
development environment that, in 
effect, takes software development 
to its next level. 

One of the most useful and spectac- 
ular facilities in LOOPS is the visually 
oriented graphics class browser 
called the Lattice Browser. This facil- 
ity has a main window that displays 
the class hierarchy with graphics 
lines depicting the lines of inheri- 
tance between classes. Many facili- 
ties for editing objects are available 
for use by interacting directly with 
this display. The main menu for the 
Lattice Browser facility looks like 
that in Example 1, page 131. 
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The PrintSummary command 
prints a full description of the select- 
ed class, including all its local vari- 
ables and methods, in the Exec win- 
dow. For example, selecting 
Active Value and using the PrintSum- 
mary command gives the display 
shown in Example 2, below. The 
PrintSummary operation has the 
convenient feature that the custom 
methods for classes are shown in 
bold type whereas the inherited 
classes are shown in normal type. 

The WherelIs command is also con- 
venient. If you need to know the 
class in which a particular method is 
first defined, all you have to do is 
choose this option, wait for a win- 
dow with a list of all the methods in 
the system, and select one. Almost 
immediately, the name of the class 
involved on the Lattice Browser net- 
work display will blink on and off. 

Developing applications in LOOPS 
involves a combination of writing 
code in the editor and accessing a 
large number of convenient facilities 
in the mouse-oriented window and 
menu environment. One convenient 
way of developing object classes is 
simply to enter an empty class in the 
Exec window and use the interactive 
facilities to flesh out the class defini- 
tion. For example: 


(DefineClass Partnership) 


Once you have entered a class in this 
way, you can then access it with the 
class browser. To do so, you call up 
the main menu, select the Browse 
Class command, and then type in the 
name of the root class at the prompt. 
Another way you can tell LOOPS that 
you want to edit the methods of a 
class is by accessing them through 
the general Lattice Browser. The 
same menus are available there as 


PrintSummary > 
Doc (ClassDoc) >: 
WhereIs (WhereIsMethod) > : 
> - 


DeleteFromBrowser 
SubBrowser 
Type InName 


Example 1: The Lattice Browser's 
main menu 
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under an individual class browser 
window. For me, the Lattice Browser 
and related classes form the heart of 
the LOOPS user interface. 


Methods 
In object-oriented systems, methods 
are the private procedures or func- 
tions known only to objects of a giv- 
en class and its descendants. LOOPS 
has six different categories of meth- 
ods—the class methods and object 
methods found in Smalltalk and 
other object-oriented systems and 
the Internal, Public, Masterscope, 
and Any method categories. Internal 
methods are the low-level system 
methods that implement LOOPS itself. 
They can be used by programmers 
who know what they are doing but 
are not intended for use as library 
methods to be specialized. Public 
methods are all those either provid- 
ed with the system or developed by 
the user that are intended to be spe- 
cialized for various purposes. Besides 
these, there are also special Master- 
scope methods that are local only toa 
particular application and can be 
used only when it has been invoked. 
Any methods are all those that have 
not been declared to be one of the 
other types. 

Methods in LOOPS follow the 
syntax: 


(METHOD ((ClassName Selector) self 
ARG1...ARGn)... body) 


Selector is the name of the method 
that, when sent to the appropriate 
object, succeeds in invoking it. The 
self argument is a dummy term that 
stands for the class to which the mes- 
sage will be sent. For example, the 
Destroy method, which is imple- 
mented for the Object class, is 
written: 


#.($ ActiveValue) 
Supers 

Object 

IVs 


CVs 


Methods 
AVPrintSource AddActiveValue CopyActiveValue DeleteActiveValue 
DeleteNestedActiveValue GetWrappedValue 

GetWrappedValueOnly HasAV? NestActiveValue PutWrappedValue 
PutWrappedValueOnly ReplaceActiveValue WrapOutside? 

WrappingP recedence 


(Method ((Object Destroy) 
self 
(<-(Class self) 
DestroyInstance self)) 


It takes no arguments other than self 
but is written so that it can be inherit- 
ed by subsequent classes but still al- 
ways destroy the proper class when 
called. The expression (Class self) as- 
sures that the message will be sent to 
the class of the object. From there, it 
simply calls on the DestroyInstance 
method. This may seem metaphysi- 
cal, but practically speaking it is im- 
portant to be able to uncreate objects 
to provide memory for creating 
other new ones. 

Methods are created in LOOPS us- 
ing DefineMethod. This function has 
the form: 


(DefineMethod class selector 
args OrFn expr file methodType) 


The way you would usually go 
about defining a new method is to 
click the middle mouse button on the 
class in the Lattice Browser and then 
select the Add command from the 
menu and AddMethod from its sub- 
menu. At that point a prompt panel 
opens with the message: 


Type the selector for the new meth- 
od: > 


You then enter the method's calling 
name. For example, let's say you en- 
ter the name NewMethod. At that 
point a window of SEdit opens with 
the following template already load- 
ed in it: 


(Method ((Object New Method) 
self 


(SubclassResponsibility)) 





Example 2: Display resulting from selecting ActiveValue and using PrintSum- 


mary in the Lattice Browser 
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This template is purely for conve- 
nience when it applies. If you like, 
you can delete any part of it or even 
all of it and begin with a clear editing 
window. 

On the whole, the template is usu- 
ally useful. To say that this is a huge 
workspace with vast resources that it 
takes substantial time to master 
would run the risk of understating 
the case. 


Active Values 
In LOOPS, an active value is an object 





that sends messages as a side effect of 
attempts to read or write to the in- 
stance variable of another object. 
This facility is often useful in visually 
oriented interfaces, debugging, ini- 
tializing variables, and defining de- 
pendency relationships between 
variables. The Active Value class is a 
direct subclass of the Object class. It is 
an abstract class, however. Instances 
are not made of it but of its 
subclasses. 

An interesting example of a practi- 
cal use of active values is in designing 
a window that always remains 
square even when resized by the 
user. The way you do this is to create 


with ¢-terp 


Our C Interpreter provides the finest and fastest development environment for C 
and is compatible with your compiler. 


e Fast Semi-Compilation -- We convert source 
to tokens faster than any product (existing or 
announced) on the market. 

e Interactive Debugging -- See your code come 
to life as you single step, set breakpoints, call 
functions, view data, execute any C expression. 

e Complete Language -- We’ve always 
supported full K&R, now we support the 
usual ANSI enhancements as well (structure 
assignment, enumerations, etc. ) as well as 
keywords cdecl and far. 

e Multiple Modules -- an accurate reproduction 
of a typical multiple module compiler 
environment brought to you in a high speed 
interactive interpreter. 

e Multi-file, configurable editor -- features fast 
screens, inter-file copies and moves, etc. etc. 
Spring from file to file, module to module. 
Develop as you never did before. Completely 
reconfigurable. 

e Complete Compatibility -- For each supported 
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separate documentation (each compiler is a 
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make sure the data alignment, bit field order, 
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with your compiler. We care about 
compatibility. 

e Shared symbols option -- for those large 
75-module applications. 
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e Software Paging -- for those big jobs. Our new 
and improved paging can now access Extended 
Memory directly. 

e Pointer checking -- An out-of-bounds 
assignment will put you into debug mode with 
the offending statement highlighted. 

e Object module support -- Link in not only your 
compiler’s library but your own libraries (large 
model), assembler routines, and commercial 
libraries such as Essential Graphics, HALO, 
Windows for Data, Greenleaf, Vitamin C, etc. 
Our function pointers are compatible with 
compiled C (a must for using commercial 
libraries) and we support call in (from compiled 
to interpreted) as well. 

e Numerous other features including our own 
batch mode, dual display and graphics support, 
tracing and 8087/80287 as well. 


Order C-terp TODAY (Specify Compiler) 
Microsoft, Lattice, Aztec, C86, Mark Williams, Xenix 


PRICE: MS-DOS 2x and up - $298 
Xenix 286 System V - $498 
VISA, MC, COD * 30 Day Money Back Guarantee 


* C-terp is a trademark of Gimpel Software. 
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an active value that tracks the width 
variable for an instance of the 
SquareWindow class and automati- 
cally sets the height variable equal to 
it. 

One of the built-in uses of active 
values in LOOPS is for dynamic moni- 
toring of the state of objects. Gauges is 
a LOOPS library application that con- 
tains a variety of display classes that 
allow you to attach the values of criti- 
cal variables to graphic displays. 
These displays depict various types 
of gauges and meters that provide for 
visual inspection of the instance vari- 
ables of instantiated objects. When- 
ever the value of an attached vari- 
able changes, the gauge or meter is 
immediately modified to indicate the 
new value. 

The Gauges class has two main sub- 
classes—LCD and Instrument. LCD in 
turn has the two main subclasses— 
Digiscale and Digimeter. Instrument, 
on the other hand, has three main 
branches—VerticalScale, Round- 
Scale, and HorizontalScale. Meters 
and Dials are specializations of the 
RoundScale class. All in all, these 
Gauge subclasses provide for just 
about any style of visual gauge or me- 
ter that might be needed, ranging 
from needle gauges to thermome- 
ters. 

To use Gauges, all that is really in- 
volved is to create an instance of one 
of the Gauge classes and provide it 
with values for the necessary param- 
eters by sending it the appropriate 
messages. To get a gauge to be visible 
on the screen, you would first create 
an instance by saying: 


(<-—$Dial New 'DialOne) 


which creates an instance of the Dial 
class called DialOne. You would then 
send it the Update message: 


(<-—$DialOne Update) 


If you need to set the value of the dial 
to an initial value, you can send the 
Set message: 


(<—$DialOne Set 100) 


The message that assigns a meter or 
dial to a given variable is the Attach 
message, which is also simple to exe- 
cute. If you wanted to assign your 
dial as an indicator of the amount of 
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fuel left in a rocket in a simulation of 
a space vehicle mission, you could do 
so easily by saying: 


(<-$DialOne Attach $TitanIV_547 
’FuelRemaining) 


This Gauges application in LOOPS is 
similar to the Activelmages facility in 
the KEE tool from IntelliCorp. 


Mixins and Multiple 
Inheritance 

LOOPS provides full support for mul- 
tiple inheritance, which means that 
a Class can be defined as a subclass of 
more than one superclass. Another 
way of saying this is that multiple su- 
perclasses can be selected as mixins 
for a new class. 

The basic rule that inheritance fol- 
lows in LOOPS can be stated succinct- 
ly as ‘left to right, up to joins.’”” What 
this means is that, if a message M is 
sent to class Z and that method is not 
directly implemented in Z, then a 
search takes place up the class lattice 
for method M among the immediate 
superclasses of Z, their superclasses, 
and so on. The order of search is left 
to right and “breadth first’ in the 
sense that all the immediate super- 
classes are searched first before any 
of their superclasses and so forth. 


Rules 

LOOPS has an original approach to us- 
ing rules. Rules are always organized 
into definite rulesets, which can 
have various different kinds of con- 
trol structure to evaluate them. A 
ruleset is always associated with 
some particular LOOPS object that 
provides the workspace for the 
rules. You can invoke rulesets in sev- 
eral different ways. In the object-ori- 
ented paradigm, you invoke them by 
sending a method to the object that 
contains them. In the access-oriented 
paradigm, you invoke them by using 
active values as a side effect of either 
reading or writing data in object 
properties. You can even write indi- 
vidual rules that invoke other rule- 
sets, and you can also invoke rulesets 
from any LISP program. 

There are six main control struc- 
tures for rule processing in LOOPS: 
Do1, DoAll, While1, WhileAll, For, 
and ForAll. If you use the DoAll con- 
trol structure, rule processing begins 
with the first rule of the ruleset and 
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executes each and every rule that is 
satisfied. With the Doi control struc- 
ture, only the first rule whose condi- 
tions are satisfied is executed. If no 
rule fires, the ruleset returns a value 
of NIL. 

The While1 control structure is a 
cyclic version of Do1. With this con- 
trol regime, a while condition is speci- 
fied. If the condition is satisfied, the 
first rule whose condition is satisfied 
is executed, as with the Do1 con- 
struct. The difference is that if the 
while condition is still satisfied after 
that, the process is repeated until the 
condition no longer holds or until a 
Stop instruction is encountered. Simi- 


larly, the WhileAll construct is the cy- 
clic version of DoAIll. If the condition 
is satisfied, all the rules are tried and 
as many executed as can fire, and 
this is repeated until either the while 
condition fails or Stop is encoun- 
tered. 

The For1 construct is another cy- 
clic version of Do1. Instead of a while 
condition, this type of control struc- 
ture has an iteration condition. The 
processing of rules occurs as with 
Do1, but the process reiterates over a 
range of values until the limit value is 
reached. A similar control regime oc- 
curs with the use of the ForAll con- 
struct, except that here the behavior 
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resembles DoAll—as many rules as 
can be satisfied are executed. 

One of the main ideas behind the 
design of the LOOPS rule-oriented 
programming approach was to al- 
low control information to be fac- 
tored out as much as possible. This is, 
of course, a worthwhile idea because 
it means that the knowledge is kept 
separate from the control structure 
mechanisms. One of the advantages 
of rule-based programming is just 
this separation of content from con- 
trol. It allows the modular addition of 
rules so that a production system 
keeps running from the time the first 
rules are entered until it is completed 
without rewriting the inferencing 
code. Some AI languages, such as 
OPS5, encourage the writing of nu- 
merous rules whose function is con- 
trol of knowledge processing, which 
tends to neutralize the advantages of 
rule-based systems in separating 
knowledge and control. The LOOPS 
control structure declarations I have 
just outlined attempt to cope with 
this. 

Another useful LOOPS rule con- 
struct is that of first/last rules, which 
are rules that can fire either before 
or after the main part of a ruleset is 
invoked. They are implemented by 
inserting an {F} or {L} in the MetaDe- 
scription field just prior to the rule 


RuleSetName: FillTub; 
WorkSpace Class: 
Control Structure: WhileAll; 
Temp Vars: waterLimit; 

While Cond: T; 


{11} 
{11} 
{1!} 
{11} 


IF loadSetting 
IF loadSetting 
IF loadSetting 
IF loadSetting 


iF temperatureSetting = ‘Hot 


WashingMachine; 


proper. LOOPS also has an audit trail 
capability in its implementation of 
rules. 

The rule syntax in LOOPS can best 
be illustrated by an example. Exam- 
ple 3, below, is an illustration from 
the LOOPS manual. In this example, 
the brace indicator {1/} indicates that 
the rules involved are “one-shot 
bang rules,” or “‘try once’ rules. The 
rules are tried only once, whether 
they pass or fail. Any declaration in 
curly braces before rules is called a 
metadescription in LOOPS. Another 
use of such metadescriptions is in the 
meta-assignment statements used for 
describing audit trails and rules. Au- 
dit trails provide a thorough facility 
for debugging and explaining why 
things happened the way they did. 

Calls to custom InterLISP or Com- 
mon LISP functions can be included 
in LOOPS rules in both premises and 
conclusions simply by enclosing 
them in parentheses. Similarly, 
LOOPS message-sending expressions 
can be nested in rules by enclosing 
them in parentheses and observing 
the back-arrow and dollar-sign con- 
ventions. Access to LOOPS instance 
variables in rules is done by using a 
colon (:) operator. So, for example: 


$YourPartnership:industry = ‘Law 
is a rule declaration that assigns the 


value Law to the industry variable of 
the YourPartnership object. Similarly, 


"Small THEN waterLimit <- 10; __sss# 
"Medium THEN waterLimit <- a 
‘Large THEN waterLimit <- 17; 
‘ExtraLarge THEN waterLimit <-— 20; 


THEN HotWaterValve.Open ColdWaterValve.Close; 


IF temperatureSetting = ‘Warm 


THEN HotWaterValve.Open ColdWaterValve.Open; 


IF temperatureSetting = ‘Hot 


THEN ColdWaterValve.Open HotWaterValve.Close; 


IF waterLevelSensor.Test >= waterLimit 
__ THEN HotWaterValve.Close ColdWaterValve.Close; 


(Stop 7) 





Example 3: An example of the LOOPS rule syntax from the Xerox 


LOOPS Manual 
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access to class variables is provided 
with the double colon (::) operator. 


Virtual Copies 

One of the more interesting things in 
the LOOPS library is the provision for 
virtual copies of networks of in- 
stances. This is based on the insight 
that it can be useful to treat a group 
of instances as a unit that can be du- 
plicated and tracked efficiently. The 
copies are virtual in two different 
ways. Only those properties of the 
instances that are modified are actu- 
ally copied. Those that remain identi- 
cal to the originals just “share” the 
values of the prototype. The copies 
are also virtual in the sense that only 
the specific instances that will be 
needed in processing are actually 
copied. 

Any object that is to have a virtual 
copy must have a special class vari- 
able called VirtualVS. The value of 
this variable specifies which instance 
variables of the original object will 
be copied as opposed to being shared. 
The implementation of virtual copies 
is accomplished by two classes— Vir- 
tualCopyMixin and VirtualCopyCon- 
text. Virtual copies represent a kind 
of hybrid between classes and in- 
stances. They provide a medium-lev- 
el mechanism whereby construc- 
tions such as perspectives and 
hypothetical reasoning can be 
implemented. 


LOOPS Applications 

With LOOPS it is possible to devélow: a 
wide variety of different AI applica- 
tions. It is not simply a shell for the 
development of expert: systems. 
Even in the case of expert systems, 
different paradigms for them have 
been developed using LOOPS that de- 
part dramatically from the usual 
rule-based systems. The facilities I 
have been describing make it possi- 
ble to develop knowledge-based sys- 
tems that make little or no use of the 
rule-based paradigm. How, then, are 
such systems designed? 

The PRIDE expert system that I dis- 
cussed in my first column is one of 
the best examples of such a system to 
date. There has been much talk at Xe- 
rox about building an entirely new 
type of expert system shell paradigm 
based on the PRIDE application, just as 
the EMYCIN shell was derived from 
the MYCIN expert system application. 
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ARTIFICIAL INTELLIGENCE 
(continued from page 136) 


A few years ago, some interesting re- 
search on hierarchical planning in 
the LOOPS environment was conduct- 
ed at Xerox PARC by the late Danny 
Berlin. 

Some important work with the 
LOOPS system has also been conduct- 
ed at Ohio State University under the 
direction of Professor B. Chandrase- 
karan. Professor Chandrasekaran is 
an advocate of what he calls “generic 
tasks’ that operate as high-level 
building blocks in the development 
of knowledge-based AI applications. 
At this point, he feels that there are 
primarily six such generic tasks: hi- 
erarchical classification, hypothesis 
matching or assessment, knowledge- 
directed information passing, abduc- 
tive assembly, hierarchical design by 
plan selection and assembly, and 
state abstraction. I will attempt to 
give only a brief explanation of these 
generic tasks here. 

Hierarchical classification is per- 
haps the best-known type of prob- 
lem in the expert systems category, a 
simple example of which is the well- 
known Animal game. It turns out 





that this problem of classification is 
at the heart of many diagnosis prob- 
lems. Hypothesis matching is the 
process of determining the degree of 
fit of a collection of data points to a 
hypothesis, such as by estimating the 
probability or certainty that the hy- 
pothesis is true. Knowledge-directed 
information passing refers to the use 
of rules or frames to encode knowl- 
edge that directs a knowledge pro- 
cessing system to seek certain values 
under various conditions. Abductive 
assembly is another form of reason- 
ing that assembles the best hypothe- 
ses for a given set of data by a method 
similar to the means-ends analysis 
used in the Dendral expert system. 
Hierarchical design by plan selection 
refers to a new type of task in expert 
systems technology—that of routine 
design. This new category of applica- 
tion is typified by two mechanical 
engineering expert systems—Aircyl 
and PRIDE. The last generic task is 
state abstraction, which involves a 
mechanism for predicting the conse- 
quences of actions by the use of qual- 
itative simulation. 

Amazing as AI workstations such 
as the Xerox 1186 may seem, some of 
this technology has already started 
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rubbing off on powerful micros. 
Next month I will review a surpris- 
ingly powerful and cost-effective, 
object-oriented programming tool: 


Smalltalk/V for IBM PCs and 
compatibles. 
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(continued from page 12) 


at fault for not making it clearer that 
the words defined by VECTOR: and 
the word DO-OPTION were conceived 
as getting their arguments from 
some routine (such as the menu rou- 
tine mentioned in the text), not from 
the user entering a number and the 
command. I must admit that it never 
crossed my mind that anyone would 
consider giving the user unedited ac- 
cess to such words as these. The 
phrase Car! quotes, 4 DO-OPTION, was 
intended as a warning, not as an ex- 
ample. (Although Car! points out that 
you can predict in general an unsatis- 
fying result from using the phrase, I 
think he will agree that the specific 
effects are unpredictable.) 

Carl and I again agree when he 
comments that programs should be 
written to protect both the program 
and the users. Carl's experience 
seems to be with command-driven 
programs; in those the command 
word must include the requisite edits 
and filters to qualify the input—and 
as he points out, a CASE statement 
normally includes implicit edits. (He 
refers to ‘‘the’’ CASE statement, but 
Forth provides no standard imple- 
mentation. CASE statements are ven- 
dor dependent, which is why I did 
not use them in my article.) 

My own programs are usually 
menu-based, with the edits built into 
the routine that presents the menu 
and collects the user’s choice. Either 
approach—menu-driven or com- 
mand-driven—can comfortably and 
reliably use execution vectors, pro- 
vided the programmer made sure 
that the argument used to index into 
the vector is within range. Execution 
vectors are such a standard and use- 
ful tool in Forth programming that I 
think condemning their writers to 
Programmer's Hell is too severe. But, 
as Car! helpfully reminds us, execu- 
tion vectors must be used with 


MOVEQ 
LEA 


#63,D1 
DCA, AO 


MOVEP.L 0(A0),DO 
MOVE.L DO, (Al) + 


DBF 
RIS 


D1 . LOOP 
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caution. 


More Feedback 

Dear DDJ, 

With respect to Dan Farnsworth’s let- 
ter and code example on page 12 of 
the April issue, I have the following 
observations: 


1. Mr. Farnsworth’s timings ignore 
the fact that DBF is faster when it 
branches than when it falls through. 
The correct times for his 68000 and 
68008 loops are 5,672 and 3,784 cy- 
cles, respectively. 

2. If you arrange the hardware so 
that each device register occupies ei- 
ther four successive even addresses, 
or four successive odd addresses, you 
can take advantage of the MOVEP in- 
struction to produce a routine [see 
Example 1, below] that is 4 bytes 
longer than Mr. Farnsworth’s 68008 
loop routine but that takes 2,980 cy- 
cles on the 68000, compared to 3,784 
for his on the 68008. The correspond- 
ing straight-line routine is 256 bytes 
longer than its 68008 counterpart, 
but it takes 2,332 cycles, compared to 
2,616 for the 68008. 


As an attempt to demonstrate that 
the 68008 can outrun the 68000, Mr. 
Farnsworth’s example fails. I had, 
however, been using a rule of thumb 
that an 8-MHz 68008 has the through- 
put of a 4-MHz 68000 (except for mul- 
tiplication and division, of course). It 
is clear that, at least in some special 
cases, a 68008 at 8 MHz can keep up 
with a 68000 at 6 MHz or better. 

(Of course, in most cases, wait 
states would slow down any of those 
routines. To run with no wait states 
in an 8-MHz system, the peripheral 
controller would have to deliver a 
byte every 500 ns—an instantaneous 
rate of 2 megabytes per second. SCSI 
with handshake cannot do better 


s 
# 


724 * 64 
712 * 64 
710 * 63 +14 644 


Total time 2980 cycles 


Example 1: Alternative to Dan Farnsworths’ 68008 loop routine 
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than 1 byte every 667 ns, or 1.5 mega- 
bytes/second. Anyone who is pre- 
pared to spend the bucks for a syn- 
chronous SCSI channel with 2 
megabytes/second or _. better 
throughput is likely to use a 68020 
rather than a 68008 or 68000.) 

Christopher T. Jewell 

3900 Moorpark Ave. 

San Jose, CA 95117 


Buttons and Gadgets 

Dear DDJ, 

Thank you for publishing Jan L. Har- 
rington’s article on Macintosh and 
Amiga interface programming (Janu- 
ary 1987). It provided me with a good 
starting point for assembly-language 
programming on the Amiga. 

Please note, however, that some 
typographical errors appeared in the 
Amiga program listing (Listing 
Three) [see Table 1, page 142]. The 
first four typos generate assembler 
errors, and the last prevents exiting 
when you select ‘‘Quit’’ on the Pro- 
ject menu. 

James P. Hastey, Jr. 

C/O PPCON, Dept. 90 

P.O. Box 220 

N-4056 Tananger 

Norway 


Dear DDJ, 

This is a follow-up to my previous 
letter on typographical errors in the 
Amiga program listing accompany- 
ing Jan Harrington’s article. 

My exuberance in actually getting 
the program to run caused me to 
overlook two shortcomings: the 
Workbench memory counter report- 
ed 176 bytes (cumulative) less of free 
memory each time the program ran 
plus the system crashed after five to 
eight successive runs. 

Closer examination revealed that 
the program needed to perform a lit- 
tle more housecleaning before exit- 
ing. Perhaps the omission was inten- 
tional, with the listings 
accompanying the article intended 
only as examples of the difference in 
the two user interfaces. As such, they 
served the purpose well. For the 
Amiga listing (Listing Three) to be a 
more practical example, a few addi- 
tions need to be made. 

This is not a complaint. I thorough- 
ly enjoyed reading Jan Harrington’s 
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article and learning a bit about the 
Amiga Intuition interface in assem- 
bly language. I would like to point 
out that I am not a programmer by 
profession but have worked with 
6502 and 8088 assembly language as a 
hobby. 

The following additions I propose 
are based solely upon recommenda- 
tions found in the Amiga ROM Kernel 
Reference Manual: Exec, the Amiga 
ROM Kernel Reference Manual: Li- 
braries and Devices, and the Amiga 


Appears in Listing as 


CALLIB_LVO\1 


Intuition Reference Manual. On the 
surface they appear to cure the prob- 
lems I’ve described. Please be aware 
that as a relative novice I may have 
overlooked something. 

Add the following to the list of xlibs 
in lines 23-41: 


xlib FreeSignal 

xlib FreeMem 

xlib RemPort 

xlib CloseLibrary 
xlib ClearMenuStrip 


Should Read 


CALLLIB__LVO\1 


(This instruction is missing 


fromthe series of xlibsin 
lines 

23to041.) 

move.1 #0,ns_Fonts(A0) 
lea Projitem,A1l 

and #%0000000000111111,DO 


xlib OpenScreen 


move.1 #0,ns__Font(A0) 


lea Progitem1,A1 
and#%0000000000111111, p1 





Table 1: Corrections to Listing Three of Jan Harrington's article (January 1987) 










move.l ReadMsg, Al 


move #IOSTD SIZE, DO 
move.l _AbsExecBase,A6 
callsys FreeMem 





move.1 
move.l] 
callsys 


ReadPort,Al 
_AbsExecBase, A6 
RemPort 





-move.l 





ReadPort, Al 


move #MP_SIZE, DO 
move.l1 —AbsExecBase,A6 
callsys FreeMem 

move.l1 ReadPort,A4 
clr.i DO 

move.b MP SIGBIT(A4),D0 
move.l1 | AbsExecBase,A6 
callsys FreeSignal 





move.l WriteMsg,Al 
move #IOSTD SIZE,DO 
move.l1 _AbsExecBase,A6 
callsys FreeMem 








move.l 





WritePort,Al 


move #MP_SIZE, DO 
move.l —_AbsExecBase,A6 
callsys FreeMem 








move.l 





WritePort,A4 


cir.l D0 

move.b MP _ SIGBIT(A4) ,DO 
move.l1 —AbsExecBase,A6 
callsys FreeSignal 








move.l1 WindowPtr,A0 
move.l IntBase,A6 
callsys ClearMenuStrip 
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Example 2: Insert for subroutine Close And Quit 







#free up read io block memory 







sremove read port from system 








zfree up read port memory 








sfree up read port signal bit 







#free up write io block memory 








#free up write port memory 








;free up write port signal bit 









sclear menu strip 






































Insert the code in Example 2, below, 
between lines 233 and 234 in the sub- 
routine CloseAndQuit, and insert the 
following between lines 239 and 240 
of the same routine: 


move.| IntBase,A1 
move.| _AbsExecBase,A6 
callsys CloseLibrary ;close the 


library 


James P. Hastey, Jr. 
(address on previous letter ) 


Jan Harrington replies: 

My thanks to James Hastey for find- 
ing the typographical errors in the 
Amiga listing. They arose primarily 
because the Amiga code, after being 
debugged on that machine, was 
keyed into the Mac from printed list- 
ings to prepare copy for typesetting 
(I suppose the smarter way would 
have been a direct machine-to-ma- 
chine transfer). His housekeeping ad- 
ditions to the code are also well tak- 
en. The purpose of that program, 
however, was simply to demonstrate 
the Amiga user interface, not to pro- 
duce a program that would actually 
do useful work. As it was getting 
very long, even with just the user in- 
terface code, I decided to keep it as 
simple as possible. 

Macintosh programs, in general, 
do not require the same sort of clean- 
up as Amiga programs do. Under or- 
dinary circumstances, the Mac’s op- 
erating system performs the cleanup 
on its Own; programmers needn't 
worry about it. 


The Right Tool 

Dear DDJ, 

I refer to Mike Suman's Viewpoint in 
your February 1987 issue. I whole- 
heartedly agree with Mr. Suman’s 
analysis of what is wrong with high- 
level languages. Though I am a high- 
level language user and have never 
written production programs in as- 
sembly language (except in comput- 
er school), I must admit that at times 
they make the life of the program- 
mer difficult, if not clerical. 

I differ with Mr. Suman’s view 
with regard to the assembly-lan- 
guage version of Mr. Anderson’s Mo- 
dula-2 program (Code Example 3), 
however. I have never programmed 
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in Modula-2, but between two evils I 
still prefer Modula-2 for I find no 
thrill or excitement in writing strings 
of 1s and Os as shown in the example. 
I feel that programmers who have 
been exposed to a wide variety of 
languages would agree with me in 
this case. We must bear in mind that 
the main aim of a high-level lan- 
guage is to unburden programmers 
from dealing with trivial things so 
they can concentrate on the main 
problem at hand. 

This is why I feel that dBASE III lan- 
guages are best when it comes to 
handling file and tabular problems. 
They provide the right ingredients 
for attacking trivial problems such as 
the one discussed. To dBASE pro- 
grammers the benefit is obvious 
right away—ease of maintenance. | 
wish facilities such as this (table han- 
dling) would be included in the new 
languages flooding the market. Fur- 
thermore, we must not forget that 
every language is designed to suit a 
particular problem, and we should 


therefore use the right tool for the 
job. We should not use a tool for 
something for which it is not intend- 
ed. We border on the unreasonable 
when we overstretch the validity of 
a thing. 

Lito Cruz 

3 Spring St. 

Thomastown, Victoria 

Australia 3074 


Correction 

Dear DDJ, 

As the author of ‘An Extended IBM 
PC COM Port Driver’ (June 1987), I 
wanted to get a head start on readers’ 
complaining about bugs in Listing 
One presented with the article. The 
seventh line of code after the label 
b000 needs to have BUFSZ * 2 changed 
to (BUFSZ * 2) — 2. This bug causes 
COM1 operation to mess up COM2’s 
buffer pointers and COM2 operation 
to destroy the ability to restore 
intOB’s vector upon termination. 
There's no problem at all if you only 
use COM1. The seventh line (I thought 


7 was a lucky number) of code after 
the label b230, with the comment in- 
dicate receiver enabled, needs to be 
moved to be the fifth line after 
b230—that is, after the jg . . line. This 
bug causes DTR protocol to work only 
if XON/XOFF protocol is used also. 

I apologize for any inconvenience 
and suggest that readers try excom, 
Version 2, available through DDJ or 
CompuServe. It has these bugs fixed, 
some substantial enhancements, and 
probably has some new and more 
exciting bugs. 

Also, the following code was de- 
leted from the bottom of page 76: 


init |= thebit; 
} 
/* set port number */ 
void 


Tom Zimniewicz 
2695 Pond Rd. 
Lima, NY 14485 


DDJ 





What if each change 
you made to your | 
program was ready to ™ 
test in seconds instead 
of minutes? 


“The SLR tools will change the 
way you write code. I don’t use 
anvthing else.” , Joe Wright 


RELOCATING MACRO ASSEMBLERS e Z80 e 8085 e HD64180 
e Generates COM, Intel HEX, Microsoft REL, or SLR REL 


e Intel macro facility 
e All M80 pseudo ops 


e Multiple assemblies via command line or indirect command file 


e Alternate user number search 


e ZCPR3 and CP/M Plus error flag support, CP/M 2.2 submit 


abort 
e Over 30 user configurable options 
e Descriptive error messages 
e XREF and Symbol tables 


e 16 significant characters on labels (even externals) 


e Time and Date in listing 
e Nested conditionals and INCLUDE files 
e Supports math on externals 


requires Z80 CP/M compatible systems with at least 32K TPA 


R Systems 
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€set cecal. 


Get real productive with REAL-TOOLS, a 
general purpose set of “C” development 
tools for UNIX™ and XENIX™. 


Get Graphics Too! [n addition to 
an advanced screen management system 
and superior windowing capabilities, REAL- 
TOOLS offers user-defined graphics for 
you to draw, save, recall, copy and animate 
symbols and panels. 


So if you're developing applications for the 


real world — get real productive. Get 
graphics. Get REAL-TOOLS. 


$4995 


Pieceb~ 
Vescres 


$99 Binary only. $549 Library source. $999 Complete source. 








PCu 


Pioneering Controls Technologies, Inc. 
510 Bering Drive, Suite 300, Houston, Texas 77057 


(713) 266-8649 


™REAL-TOOLS is a trademark of Pioneering Controls Technologies, Inc. 


™UNIX is a trademark of AT&T. 
™XENIX is a trademark of Microsoft Corporation. 
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PROGRAMMER’S SERVICES 








The New Internal 

Coding Engines 

In this issue we look at the decision- 
making and loop constructs imple- 
mented by the new BASICs. These 
contructs enable you to write more 
structured code and use fewer GO- 
TOs. Most of these constructs are de- 
rived from features of other lan- 
guages, notably Pascal. Does that 
mean that BASIC is being Pascal-ized? 
No! It simply indicates that a well- 
thought-out and more structured 
program is superior to an un- 
planned, GoToO-riddled program. 
Clarity and neatness of code really 
pays off when you come back later 
to update your program. 

The new decision-making con- 
structs have much to offer. First, the 
one-line IF...THEN... ELSE state- 
ment has been extended to spread 
over multiple lines. Moreover, ELSEIF 
clauses are now supported. This syn- 
tax for the JF statement is a much 
needed improvement. The ability for 
the THEN and ELSE clauses to contain 
a series of statements enables you to 
phase out GOTOs painlessly. Example 
1, right, shows the general syntax of 
the extended I/F statement. 

The new BASICs have also added a 
CASE statement. QuickBASIC (Version 
3.0), Turbo BASIC, and True BASIC 
have implemented SELECT CASE with 
features that outperform the CASE 
statements of Pascal and Modula-2. 
Example 2, right, demonstrates all 
the types of CASE statements in the 
new CASE SELECT. They are: 


esingle items to be compared with 
the selected variable 

ea list of items, delimited by commas 
ea range of values to be compared 
with the selected variable 
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THE STATE OF BASIC 





¢ partial logical expressions 


CASE statements can also contain a 
combination of these. 

Looking at Example 2, notice that 
the first CASE statement compares 
the selected string A$ with a single 
item. The second CASE contains a list 
of selected symbols. The following 
three CASE statements use the value 
range (<first> to <last>) to detect 
if the input character is lowercase, 
uppercase, or a digit. The following 
two CASE statements use the inequal- 
ity operator to test if the character is 
a control character or an extended 
ASCII character. Finally, the CASE 
ELSE clause is an important catchall 
clause. 

The new BASICs also include a new 
loop construct—namely, the DO 
... LOOP, a powerful and flexible 
loop that has the ability to use logical 
testing. The standard FOR... NEXT 
loop has been supported by adding 


IF <expression> THEN 
<sequence of statements> 
ELSEIF <expression> THEN 


<sequence of statements> 
ELSE 

<sequence of statements> 
END IF 





Example 1: General syntax of 
extended If statement 


INPUT "Enter Character ";AS$ 
If AS = “" THEN AS = * ® 


SELECT CASE A$ 


CASE "+" 
PRINT "Plus sign” 
CASE wim "6" wg 
PRINT "Special symbols" 
CASE na to Wott 
PRINT “Lower case" 
CASE "A" to *Z" 
PRINT "Upper case" 
CASE “0 to "9" 
PRINT "Digits" 
CASE is < CHRS (27) 
PRINT “Control character" 
CASE is > CHRS$(127) 
PRINT "Extended ASCII set" 
CASE ELSE 
PRINT "Not classified by 


END SELECT this program 


END 


Example 2: Short program to 
demonstrate SELECT CASE 








an EXIT FOR statement to enable a 
clean exit from a FOR loop. Turbo BA- 
SIC also supports EXIT statements for 
the WHILE loop and IF and CASE 
statements. 


The bare bones DO...LOOP is an 
open loop that is exited from with an 
EXIT LOOP/DO statement. The DO 
... LOOP EXIT statement is embedded 
in the loop body. The WHILE and/or 
UNTIL clauses can be placed after the 
DO or LOOP keywords, as in: 


DO [[WHILE | UNTIL] <expression> ] 
<sequence of statements> 
LOOP [[WHILE | UNTIL] <expression> ] 


This creates an interesting combina- 
tion of tests, especially because 
WHILE/UNTIL clauses can occur si- 
multaneously after the DO and LOOP 
keywords. The powerful DO 
... LOOP can easily offer the equiva- 
lent of WHILE... WEND (in BASIC it- 
self), REPEAT ...UNTIL (in Pascal), 
and DO... WHILE (in C). 

In addition, loops using UNTIL <ex- 
pression> clauses can easily replace 
the equivalent WHILE NOT <expres- 
sion>. Thus, the familiar file-read- 
ing loop: 


OPEN 1,”1’,”"DATA.DAT” 
WHILE NOT EOF(1) 

<file input operations> 
WEND 

CLOSE #1 


can be replaced by: 


OPEN 1,”1”,”DATA.DAT” 
DO UNTIL EOF(1) 

<file input operations> 
LOOP 

CLOSE #1 


This State of BASIC is the last in a 
series of introductory material on as- 
pects of the new BASICs. Future issues 
of DDJ will contain articles that dis- 
cuss, in an integral fashion, various 
aspects of programming with BASIC. 


DDJ 


Vote for your favorite feature/article. 
Circle Reader Service No. 9. 
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PRESENTING THE DIFFERENCE BETWEEN 





For compiling speed, 
you can’t do better than 
Let’s C. But to really 
speed up programming 
you can’t do without the 
powerful source level 
debugger, csd. 

If you want the 
power, portability and flex- 
ibility of C, start with the 
complete compiler, Let’s C. 
For utilities, editor, compil- 
ing speed and fast, dense 
code, Let’s C has it all. 

But to get your pro- 
grams up and running you 
need more. Because even the fastest compiler 
can’t outrun bugs. You need the revolutionary C 
Source Debugger, csd. 


CUT EA ae TIME IN HALF 


csd lets you bypass the time consuming frus- 
trations of debugging—like long dumps and clunky 
assembler. With csd, you actually debug in C. You learn 
faster because you watch your program run in C. You 
finish faster because csd combines the speed of a compiler 
with the interactive advantages of an interpreter. The end 
result? Development time is sliced in half. 


LET'S C AND csd FEATURES 


e Not copy protected 
Sieve Benchmark 
(Compile time in seconds) 


Let's C: 2.8 (On 512K 6Mhz IBM-AT) 
Turbo C: 3.89 (As advertised) 





e Debug in C source code, not 
assembler 
e Monitor variables while 
e New make utility tracing program 
e Fast compact code plus register e Does not change program speed 
variables or size 
e Provides separate source, eval- 
uation, program and history 
windows 
e On-line help screens 
e Can interactively evaluate any 
C expression 
e Can execute any C function in 
your program 
e Trace back function 
e Ability to set trace points 
e Not copy protected 


e Full Kernighan & Ritchie C and 
extensions 

e Full UNIX compatibility and 
complete libraries 

e Many powerful utilities including 
make, assembler, archiver, cc one- 
step compiling, egrep, pr, tail, we 

e MicroEMACS full screen editor 
with source included 

e Supported by dozens of third 
party libraries 








e For the IBM-PC and Compatibles ™ 





FAST COMPILING AND FAST PROGRAMMING 


REVIEWERS ARE 
RAVING ABOUT 
LET’S C AND csd. 


“Let's C is an inex- 
pensive, high-quality 
programming package... 
with all the tools you will 
need to create applications.” 
—Wilham G. Wong, BYTE, 
August 1986. 


“The performance and 
documentation of the $75 
Let’s C compiler rival those 
of C compilers for the PC 
currently being sold for 
$500... highly recommended...” 


LIMITED TIME | —Marty Franz, PC TECH JOURNAL, August 1986. 
OFFER 
FREE csd 
H csd WITH LET’S C! 


“esd is close to the ideal debugging environ- 
ment...a definite aid to learning C and an 
indispensable tool for program development.” 
—William G. Wong, BYTE, August 1986. 


“This is a powerful and sophisticated debugger built on a 
well-designed, ‘serious’ compiler.” 
—Jonathon Sachs, Micro/Systems Journal, April, 1986 


START TO FINISH, THERE’S NO 
BETTER ENVIRONMENT. 


Get started with the nght C compiler and you'll have 
everything you need for development—including source 
level debugging. On top of it all, Let’s C and csd are today’s 
best values in professional C programming tools. And 
most reliable: Mark Williams C compilers have been sold 
with DEC, Intel and Wang computers since 1981. 


60 DAY MONEY BACK GUARANTEE 


Mark Williams gives you a full 60 days to find out just 
how good Let’s C and csd really are—or your money back. 

So if you want more than a fast compiler—if you want 
your programs up and running fast, ask for Let’s C and 
csd. You'll find them at your software dealer’s, in the soft- 
ware department of your favorite bookstore, through the 
Express Program at over 5500 Radio Shacks or you can 
order now by calling 1-800-MWC-1700.* DDJ 8/87 


“In Llinois call, 1-312-472-6659. 


Mark 
(i) Williams 
Company 


1430 West Wrightwood, Chicago, Illinois 60614 


© 1987 Mark Williams Company 
Let’s C is a registered trademark of the Mark Wiliams Company. 
UNIX is a trademark of Bell Labs. 


MARK WILLIAMS LET'S C AND csd.ONLY $75 EACH. 
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OF INTEREST 











Spring Comdex in Atlanta is usually a 
software show, but this year, despite a 
conference program that focused on 
software issues, the exhibit floor con- 
tained a lot of hardware products. In 
terms of delivery, some of the PS/2 
add-on hardware was softer than the 
386 system software, of which there 
was also an abundance. 


386 Computers 

Wyse has announced a line of 286 
machines and a 386 machine, all 
planned to track IBM and OS/2 but 
with some features that make the 
machines interesting to technical us- 
ers. Each machine has front-panel 
controls and an LCD system-status dis- 
play, disk caching, software emula- 
tion of the LIM expanded memory 
spec, and a disk reorganization utility 
to improve hard-disk access time. 
The 386 machine can support both 
the 80287 and the 80387 math co- 
processors; it costs $4,999 for a 40- 
megabyte hard-disk model. 

Wyse has cut prices on older mod- 

els, for example, an AT-compatible 
now costs $1,999. Wyse tube subsid- 
iary Amdek has also entered the per- 
sonal computer market with its own 
line of 8088- through 80386-based ma- 
chines. Reader Service No. 16. 
Wyse Technology 
3571 North First St. 
San Jose, CA 95134 
(408) 433-1000 


Unix and DOS, with prices starting at 
$3,995. One, TeleStar, comes with an 
80387 coprocessor. Another, Telenix, 
uses Microport’s V/386 Unix and DOS- 























Merge software, allowing Unix and 
DOS applications to run concurrently. 
TeleVideo thinks Unix/DOS integra- 
tion’s hour is nigh, citing 32-bit pro- 
cessor performance, convergence on 
System V for 32-bit systems, and good 
sales in key markets for Unix in the 
past few months. TeleVideo bought 
into Microport Systems, a company 
with a pivotal role in Unix/DOS inte- 
gration, in March of this year. Reader 
Service No. 17. 

TeleVideo 

1170 Morse Ave. 

P.O. Box 3568 

Sunnyvale, CA 94088-3568 

(408) 745-7760 


In the continuing saga of Unisys reor- 
ganization, the company has re- 
grouped a number of former Sperry 
and Burroughs Unix-based comput- 
ers into one line running System V.2 
from AT&T. Prices range from 
$14,000 to $500,000. Unisys has also 
announced a 386 workstation called 
the B38 for $4,835, or $5,635 with an 
80287 coprocessor. Reader Service 
No. 18. 

Unisys Corp. 

P.O. Box 500 

Blue Bell, PA 19424-0001 

(313) 972-9515 


Intelligent Data Systems, with 
heavy backing from Taiwan clone 
maker Copam, has entered the 386 
market with a 16-MHz 386 machine 
with 1-megabyte RAM, 1.2-megabyte 
floppy drive, two serial ports, one 
parallel port, DOS 3.2, a 40-megabyte 
hard disk, and EGA graphics for 
$4,495. Reader Service No. 19. 
Intelligent Data Systems 

6319 East Alondra Blvd. 

Paramount, CA 90723 

(213) 633-5504 


_ Contrary to popular belief, the lead- 
_ ing mail-order manufacturer of per- 
sonal computers is not an Austin- 


based company named PC’s Limited. 


_ The company that has been doing 
TeleVideo has introduced four 386 | 
computers, some with concurrent | 


business as PC’s Limited was actually 
incorporated as Dell Computer Cor- 
poration in 1984, and it announced 
at Comdex that it would henceforth 


be using its real name, although exist- | 


ing products will continue to carry 











the PC’s Limited logo. The change is 
undoubtedly because of a desire to 
get away from the low-budget mail- 
order image and to problems the 
name would cause as the company 
pushed into international markets. 
The fact that 22-year-old founder 
Mike Dell has acquired a degree of 
fame may have had something to do 
with it, too. The company continues 
to challenge the more pin-striped 
manufacturers on price and per- 
formance, has cut prices on its 286 
machines, and is pushing price com- 
parisons of its 386 machine with 
Compaq's and IBM's. The 386?® sys- 
tems start at $4,499 for a 40-megabyte 
hard drive, monochrome system. 
Reader Service No. 20. 

PC’s Limited/Dell Computer Corp. 
1611 Headway Cir., Bldg. 3 

Austin, TX 78754 

(512) 339-6800 


SOTA Technology claims that you 
don't really need a 386 machine, cit- 
ing benchmarks on which its 286 
Mothercard 5.0 outperforms a Com- 
paq Deskpro 386. The PC or compati- 
ble card comes with up to 4 mega- 
bytes on-board RAM and a 12.5-MHz 
286 processor; a daughtercard can in- 
crease RAM to 12 megabytes and uses 
only one bus slot. An EPROM and bat- 
tery-backed RAM hold the BIOS, mak- 
ing it eminently reconfigurable, so 
SOTA can pursue OS/2 compatibility. 
Reader Service No. 21. 

SOTA Technology 

657 North Pastoria Ave. 

Sunnyvale, CA 94086 

(408) 245-3366 


386 System Software 

The THEOS multiuser, multitasking 
operating system has been enhanced 
for the 386. Version 2.2 addresses up 
to 16 megabytes of real memory in 
protected virtual address mode, can 
read and write DOS files from/to a 
DOS partition, and supports the 80387 
coprocessor. Reader Service No. 22. 
THEOS 

1777 Botelho Dr., Ste. 360 

Walnut Creek, CA 94596-5022 

(415) 935-1118 


The Software Link is shipping PC- 
MOS/386, the multiuser, multitasking 
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The best bugfighter 
Siemee 3 














smorrow, the last thing you want is a compiler 
malfunction. Prospero’s Pro Pascal compilers give 
you the best in quality and reliability. : 

Among professional programmers with deadlines 
to meet, no other Pascal compiler has a reputation to 
match. Pro Pascal is a full-specification ISO 7185 
compiler, officially validated as conforming 
completely to the international standard without a 
single error. It has a number of carefully chosen 
extensions for real-world computing. The package 
includes libraries, a linker, librarian, X-ref program, 
and a powerful symbolic debugger. 

Prospero Software is dedicated to languages and to 
customer support. For an opinion ask a colleague; for 
information call 01-741 8531 or write to Prospero 
Software Ltd , 190 Castelnau, SW13 9DH, England. 


Prospero Software a 
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" operating system for 386 machines 
that we discussed in July. Early re- 
ports are mixed; well say more 
when we know more. Reader Ser- 
vice No. 23. 

The Software Link 

3577 Parkway Ln. 

Atlanta, GA 30092 

(404) 448-5465 





Quarterdeck has announced Ver- 
sion 2.0 of DesqView, its multitasking, 
multiwindow environment. Version 
2.0 has VGE and MCGA graphics, sup- 
ports Microsoft Windows-specific, 
Digital Research GEM-specific, and 
IBM Topview-specific applications; 
and EGA’s 43-line and VGA’s 50- and 
60-line text modes. There's a full API 
capability so programmers can de- 
velop to the Deskview look and feel 
and a 386 memory manager a la Com- 
paq’s on the Deskpro 386. Suggested 
retail price is $129.95. Reader Service 
No. 24. 

Quarterdeck Office Systems 

150 Pico Blvd. 

Santa Monica, CA 90405 

(213) 392-9851 





DesqView looks particularly impres- 
sive when one of its tasks is actually 
running on Definicon’s DSI-780 
68020/68881 card. The 780 line is just 
the latest of Definicon’s 32-bit co- 
processor products, which the Defin- 
icon folks have described in the Au- 
gust and September 1985 and July 
and August 1986 issues of Byte. They 
now claim that the 780 in an AT runs 
AutoDesk’s AutoCad faster than any 
other system does, including the best 
unannounced 386 machine and the 
top-of-the-line Sun workstation. 
Reader Service No. 25. 

Definicon Systems Inc. 

1100 Business Center Cir. 

Newbury Park, CA 91320 

(805) 499-0652 





mode and address several megabytes 
of memory. They do not replace DOS; 
system calls still work and the operat- 
ing system still looks like DOS to the 
user. AI Architects is the developer of 
Hummingboard, a PC card with up to 
24 megabytes of on-card RAM and a 
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OS/286 and OS/386 from AI Archi- | 
tects are extensions to DOS 3.x that | 
permit programs to run in protected | 

















16-MHz or 20-MHz 386. The Hum- 
mingboard does not replace the 286 
or 8086 CPU in the way that an accel- 
erator card does but implements a 
smooth coprocessor design. Reader 
Service No. 26. 

AI Architects Inc. 

One Kendall Sq., Ste. 2200 
Cambridge, MA 02139 

(617) 577-8052 


For people using 386 systems for mul- 
tiuser purposes, Arnet has developed 
an add-on board called the Virtual 
Terminal Adapter that makes the 386 
think that dumb terminals are video 
RAM. The board has four RS-232 
ports. The problems the board solves 
have to do with running DOS applica- 
tions, multitasking, and supporting 
local printers. Many DOS applications 
write directly to video RAM, so they 
don't work with dumb terminals. 
Multiuser operating systems general- 
ly do not support multitasking on 
dumb terminals because they are not 
memory-mapped, and multiuser sys- 
tems usually cannot drive both the 
dumb terminal and a printer at- 
tached to it. Mapping the dumb ter- 
minals into video RAM and saving the 
386 the associated housekeeping 
chores solves all these problems, Ar- 
tek claims. The board's price is 
$1,500—2,000. Reader Service No. 27. 
Arnet Corp. 

476 Woodycrest Ave. 

Nashville, TN 37210 

(615) 254-0646. 


PS/2 Add-Ons 

Many board companies announced 
the launching of PS/2 product lines, 
but reading between the lines showed 
that often the only product near re- 
lease was a board for the non-Micro 
Channel Model 30. 


_ Orchid claims orchids for exhibiting 


the first memory board for the IBM 
PS/2 with a 2-megabyte Micro Chan- 
nel board for $995. It’s designed for 
Model 50/60 machines and will sup- 
port both LIM Expanded Memory 
Spec and extended memory, which 
later will matter when Microsoft re- 
leases OS/2. 

Orchid has also announced Jet- 


RAM, a 32-bit RAM board with 2 mega- | 


bytes of extended memory for DOS or 













Unix users, and a graphics card com- 
patible with PGA, CGA, EGA, MDA, and 
Hercules graphics. Reader Service 
No. 28. 

Orchid Technology 

45365 Northport Loop West 
Fremont, CA 94538 

(415) 683-0300 


Tecmar is heavily committed to sup- 
porting PS/2 machines. Tecmar, you 
may recall, was quick to deliver a 
third-party hardware product for 
the IBM PC back in 1981, and it would 
like to be near the front of the PS/2 
pack. Announced products include a 
memory/multifunction board with 
up to 2 megabytes and two serial 
ports. Reader Service No. 29. 

Tecmar Inc. 

6225 Cochran Rd. 

Solon (Cleveland), OH 44139-3377 
(216) 349-0600 


Quadram announced several PS/2 
line products, including a 2-mega- 
byte memory board, 2-megabyte 
multifunction board, and I/O boards 
for Models 50 & 60. Only 512K- and 1- 
megabyte versions will be available 
at release this summer, using 256K 
SIMMs (Single In-line Memory Mod- 
ules); the 2-megabyte version will use 
1-megabyte SIMMs. Quadram also an- 
nounced an 80287-based graphics 
board, offering thrice the clarity, 16 
times the color selection, and 25 times 
the speed of EGA, now shipping; 
modes include 800 X 600 X 4. Reader 
Service No. 30. 

Quadram 

One Quad Wy. 

Norcross, GA 30093-2919 

(404) 923-6666 


DDJ 
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We’re Programmer’s Connection, 
your best one-stop source for qual- 
ity programmer’s development 
tools for IBM personal computers 
and compatibles. Here are some 
important facts you should know 
about us and other dealers in our 
industry. 


FACT: 


FREE Shipping. Shipping to U.S. 
customers is FREE via UPS Ground. 
If you want your order shipped via an 
express service, we’ll only charge you 
the shipping carrier’s standard rate 
with no special fees. Some dealers 
charge extra for shipping and then add 
rush charges for shipping via express 
services. Others may advertise “‘free”’ 
shipping but make up for it by charging 
extra handling fees. 


FACT: 


Credit Cards. We’ll charge your credit 
card only when we actually ship your 
order. Some dealers would charge your 
credit card at the time you place your 
order. This could leave you waiting for 
your shipment for weeks or months 
while they use your money interest-free. 


FACT: 


Discounts. We discount all software 
products — even special order items. 
Every product in our advertised price 
list is shown with its list price and dis- 
counted price. We want you to know 
exactly how much you’ll save on every 
product. We don’t try to fool you by 
discounting some products and charg- 
ing full retail for others. 


about 





Software Dealers 


FACT: 


Consistent Prices. We extend the 
same current prices to every customer 
regardless of where they see our ad. 
Some dealers vary prices in different 
ads and then ask you to mention which 
one you saw. This technique allows 
them to charge you the highest prices 
possible. 


FACT: 


No Hidden Charges. The discount 
prices you see on the next two pages are 
all you pay. We don’t charge extra for 
UPS Ground shipping, credit cards, 
COD orders, purchase orders, sales tax 
(except Ohio) or special handling (ex- 
cept for non-Canadian international 
orders). 


FACT: 


Guarantees. We offer FREE 30-day 
no-risk return guarantees and 30-day 
evaluation periods on most of our prod- 
ucts. Some dealers have no return op- 
tions while others often charge restock- 
ing fees of 15% or more. 


FACT: 


Quality Products. Our product line 
consists of hundreds of high quality 
software development tools specifically 
for IBM Personal Computers and 
compatibles. While some dealers try to 
carry every software product ever writ- 
ten, we carry only those that meet our 
very high standards for quality and 
value. 


FACT: 


Latest Versions. The products we 
carry are the latest versions and come 
with the same manufacturer’s technical 
support as if buying direct. While some 
dealers may participate in the software 
gray market, we’re authorized to sell 
every product we carry. 


FACT: 


Large Inventory. We have one of the 
largest inventories of programmer’s 
development products in the industry. 
Most orders are shipped within 24 
hours. And if we don’t have a product in 
stock, we’ll get it for you fast. 
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The Hard Facts 





FACT: 


Meticulous Packaging. We'll give 
your shipment the extra protection 
needed to reach you in the best possible 
condition. First we’ll protect your 
products from moisture by wrapping 
them in plastic. Then we’ll insulate your 
box with high quality bubble-wrapping 
instead of the messy styrofoam chips 
that many other dealers use. Finally, 
we'll double-tape your box for extra 
strength. 


FACT: 


Independence. Since we’re not direct- 
ly affiliated with any software publisher 
or developer, we can give you sound, 
unbiased advice. Unlike some other 
dealers who have a special interest in 
promoting only certain products, we’ll 
give you an objective look at the prod- 
ucts we carry. 


FACT: 


Noncommissioned Staff. Our cour- 
teous sales staff is always ready to help 
you. And if you aren’t sure about your 
needs, our knowledgeable technical staff 
can give you sound, objective advice. 
Because they are noncommissioned, 
you won’t be pressured into making a 
purchase. 


As you can see, we’re different from 
the other dealers in our industry. 
Our customers keep coming back 
because we consistently provide 
the highest quality service and the 
lowest prices. So call us today and 
experience the differences for 
yourself. 





Turn the page for our product list and 
ordering information. 





ai-expert systems 


1st-CLASS by Programs in Motion 
Autolntelligence by /ntelligenceWare............++- 
Experteach Il by /ntelligenceWare............+++- 
EXSYS Development Software by EXSYS..........-. 

EXSYS Runtime System.................004-- 
Insight 1 by Leve/ Five Research ..........+--+055 
Insight 2+ byleve/ Five Research 
Intelligence/Compiler by /ntelligenceWare 
Logic-Line Series A// varieties by Thunderstone....... 


ai- lisp language 

GCLISP Golden Common LISP by Gold Hill 
GCLISP 286 Developer by Gold Hill ............04. 
Microsoft LISP Common LISP ...........000000 005 
QNIAL Combines LISP & APL by MAL Systems 
TransLISP PLUS from Solution Systems ..........-. 


ai- prolog language 
APT Active Prolog Tutor from Solution Systems ....... 
Arity Combination Package 
Expert System Development Pkg 
File Interchange Toolkit.....................4- 
PROLOG Compiler & Interpreter 
Screen Design Toolkit ................-.0005- 
SOL Development Package 
Arity PROLOG Interpreter 
Arity Standard Prolog 
LPA microPROLOG A// Varieties. ............-0055 
MPROLOG Language Primer LOG/CWARE........... 
MPROLOG P500 by LOGICWARE ..............45. 
MPROLOG P550 by LOG/CWARE ..............-.. 
Prolog-86 Plus fram Solution Systems 
Turbo PROLOG dy Borland Intl .... 20.0... cece eee 
Turbo PROLOG Toolbox dy Borland Intl............. 


ai- smallitalk language 


Combo Offer by Digitalk........... Offer ends 8/31 
Smalltalk/V.. 0... ee ee ees 
EGA/VGA Color Option ...................... 
eedies OGROUS .o5sks cece oididerouesctiees 
Smalltalk/Comm .............. 000 eee ee ee eee 


ai- texas instruments 


Arborist Decision Tree Software .............. New 
PU SCNONG FI: oss 35h ees esdeteaess New Version 
Personal Consultant Easy.................00008- 
Personal Consultant Images .................22-- 
Personal Consultant Online 
Personal Consultant Plus .............. New Version 
Personal Consultant Runtime 


ada language 


AdaVantage by Meridian Software Systems ...... New 
Janus/ADA C Pak by R&R Software............... 
Janus/ADA D Pak by R&A Software. ............. 
Janus/ADA ED Pak by R&A Software.............. 


apl language 

APLOPLUS/PC DV SISE scars itasseixescxes ees 
APL*PLUS/PC Spreadsheet Mgr dy S7SC .......... 
APL*PLUS/PC Tools Vol 1 by S7SC 
APL*PLUS/PC Tools Vol 2 by S7TSC 
ATLAS "GRAPINCS by SISE  oeciossiisnesctsuces 
Financial/ Statistical Library by S7TSC .... 2.2.0.0... 
Pocket APL by SISE . ccccccwisc cad svewcesen ees 
STATGRAPHICS by S7SC 


Poa a ae ee ae ee ee 


ee 
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eee eee eee eee eee 
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ee 


ee 
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assembly language 


386 ASM/LINK Cross Asm by Pharlap ............ 
8088 Assembler w/Z-80 Translator hy 2500 AD...... 
ASMLIB Function Library by BC Assoc.............. 
asmTREE 8-7ree Dev System by BC Assoc 
Cross Assemblers Various by 2500 AD ............. 
Microsoft Macro Assembler..................... 
Norton Utilities by Peter Norton 
Norton Utilities (Advanced) 
Turbo EDITASM hy Speedware ...............4.. 
Uniware Cross Assemblers Various by SDS.......... 
Visible Computer: 8088 by Software Masters ........ 
Visible Computer: 80286 ................... New 


ee 


basic language 


87 Software Pak by Hauppauge ...............45. 
EXIM Services Toolkit by FX/IM ...............4.. 
Finally by Komputerwerks ... 0... 0c eee 
Inside Track from Micro Help ............. 000 ee 
MACH 2 by Micro Help ... 1... ee eee 
MicroHelp Utilities by MicroHelp ............. 
Microsoft QuickBASIC............ $20 Rebate Offer 
Peeks ‘n Pokes from MicroHelp ...............4.4. 
OBase Ae/ational Database by Crescent ........ 
Quick-Tools by BC Associates................ New 
QuickPak by Crescent Software ..............065. 
Scientific Subroutine Library by Peerless ........... 
Screen Sculptor by Software Bottling .............. 
Stay-Res by MicroHelp ... 1.2.0... 0c 
True Basic w/Run-time ............. 
TH UO ono och en5 seo stare bgas noes nteses 


blaise products 


ASYNCH MANAGER Specify C or Pascal 
TOOLS PUGS ics oescdw ie veaseeiasdguacaves 
EXEC Program Chainer... . 2.2.0... cc eee 
LIGHT TOOLS for Datalight C......... 
PASCAL TOOLS 
PASCAL TOOUS 2 vac ccic ce dacs caw en cas 834s 
PASCAL TOOLS & TOOUS 2 «2c ss5 ee swidecedac 
RUNOFF Jext Formatter............-00 000 eee 
TURBO ASYRGH PUUS o5 65 cceasicaen cds sievdss 
TURBO C TOOLS 
TURBO POWER TOOLS PLUS................... 
VIEW MANAGER Specify C or Pascal ............-. 


eee ee eee eee 
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List Ours 


borland products 


EUREKA Equation Solver ......... 00000 e cece eee 100 
Reflex & Reflex Workshop ................----5; 200 

Retlex Data Base System occ cccae sea ceecs ss. 150 

Reflex Workshop ...............2-0 eee eees 70 
Sidekick & Traveling Sidekick ...............---- 125 

SiMGMIEN each kaa enecse oot en beeen hek wees 85 

Traveling Sidekick .............. ccc cence cee: 70 
SURGIMOY 5 6:65.46 eek Concedes peonned se oeees 100 
Turbo BASIC Compiler.............-.-. eee eees 100 
Turbo C Compiler (Ca// for support products)......... 100 
Turbo Database Toolbox... ...........0.cceeeee 70 
Torta Editar Teele’ csc sccinciscce ose senesced 70 
Turbo Gameworks Toolbox................-2-05+ 70 
Turhe Graphix TeeWben «6. s020 os sconces cereus eas 70 
Tero (ume POGK g a.5 5 oooh 358554 eee 86a ss od aw 300 
Turho LIQ o:coc i cesar cn adedowss enrages 100 
Turbo PASCAL Numerical Methods Toolbox......... 100 
Tura PASCAL ond Tet08 vcs 006 css sess scasews ss 125 

Tighe: PASCAL «2. uciscoscscaeeecndiee pense es 100 
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Turbo PROLOG Compiler ....................-.. 100 
Turbo PROLOG Toolbox...................-.-.. 100 
Word Wider oc.cicxs o0.be cick b ee sores keneesseus 70 
Word Wizard and Turbo Lightning ................ 150 
c++ 

C++ by Guidelines w/version 1.1 kernel ..........+.. 195 
PforCe++ Function Library hy Phoenix...........+.- 395 
c compilers 

C86PLUS by Computer Innovations ............4++: 497 


Datalight C Compiler by Datalight...............+-- 60 
Datalight Developer Kit 


Datalight Optimum-C ... 1.2... cece ccc essences 139 
DeSmet C w/Debugger & Large case .... New Version 209 
DeSmet C w/Debugger only........... New Version 159 
Eco-C Complete System by Ecosoft.............++: 140 
Lattice C Compiler vers. 3.2 from Lattice ........... 500 
MWC Let’s C w/csd ........ Special Price until 8/31 = 125 
Microsoft C Compiler w/CodeView ............... 450 
Microsoft QuickC Compiler ................. New 99 
Turbo C Compiler by Borland ........... 0. eee eee 100 
Uniware 68000/10/20 Cross Compiler by SDS ...... CALL 
c interpreters 
C-terp by Gimpel, Specify compiler ...........0445- 300 
C Trainer with Book by Catalytix ............00 005, 122 
Instant C by Rational Systems... 2... 2.0606 e eee eee 500 
Introducing C by Computer Innovations ............. 125 
Run/C by Age of Reason ...... 2... eee 120 
Run/C Professional by Age of Reason ............. 250 
c utilities 
c-tree & r-tree Combo by FairCom ..............-. 650 
c-tree /SAM File Manager ............000 000s 395 
r-tree Report Generator ...... 0.02. e cece eevee 295 
C Windows by Syscom ............ccccccceeeces 100 


C Wings by SySCON? «02s. cee aceeteasensse ees 50 


Data Windows by Magus Inc .............4.-- New CALL 
dBx dBASE to C Translator by Desktop Al ........... 350 
Flash-up Windows by Software Bottling ............ 90 
GraphiC Color version by Sci Endeavors............. 350 
GRAFLIB OV SUNGSON occ o css send cee reeendek 175 
HALO Graphics by Media Cybernetics .............. 300 
HALO Development Pkg for Microsoft.............. 595 
The HAMMER by OES Systems ............000eee 195 
PANEL Forms Management by Roundhill............ 295 
PANEL Plus by Roundhill ..... 0... ec eee 495 
PC Lint by Gimpel Software ......... 6c cece 139 
PLOTHP by Sutrasolt ois cces0sececkcaes teases 175 
Professional C Windows by Washburn ............. 89 
Scientific Subroutine Library by Peer/ess ........... 5 
Vitamin C by Creative Programming .........-.++-+ 225 
VC Screen Forms Designer...........0 eee eee 100 
Zview by Data Mgmt Consultants .............+4+- 245 
cobol language 
COBO Lspll by FleXUS i005 cscsa veces ecascedtesens 395 
FPLIB for Realia COBOL by BC Associates........... 149 
Micro Focus COBOL See Micro Focus Section 
Microsoft COBOL See Microsoft Section 
Realia COBOL with RealMENU .................. 1145 
Realia COBGL: icc ncses ty actedesde cs ces eines 995 
RealGiC js cisions 560 0040s 0s ccieS se sexs b50% 995 
RM/COBOL dy Ayan-McFarland ............6.006- 950 
RM/COBOL 85 dy Ayan-McFarland ..............: 1250 
SCREEMIO by NOmCON 2355 6.200086 6s be 0%s es New 400 
screenplay for COBOL by Flexus ...........0-00005s 175 
css products 
Combo Package by Custom Software Systems.... New 199 
PC/SPELL Spelling Checker............-.. New 49 
PC/TOOLS UM/X-like Utilities... 6... 0.666. New 49 
POV EURO ieee os $2 48seseseesnecees 149 
debuggers & profilers 
386 DEBUG Cross Debugger by Phar lap ........... 195 
Advanced Trace-86 by Morgan Computing .......... 175 
Codesifter Profiler by David Smith. ............006. 119 
Codesmith-86 by Visua/Age.............. 00 eee 145 
DSD87 by Soft Advances ........... 20. cece eee 125 
MiniProbe by Atron ............. 0-0 eee cee ees hehe) 
Periscope | with Board by Periscope .............-. 345 
Periscope Il with NM/ Breakout Switch ............. 175 
Periscope II-X Software only ...........0.00 200s 145 
Periscope III 8 MHz version .............0 0s eee 995 
Periscope Ill 70 MHz version ..............2.0055 1095 
The PROFILER with Source Code by OWB........... 125 
TURBOsmith Source debugger for Turbo Pascal....... 69 
The WATCHER Profiler by Stony Brook............. 60 
disk utilities 
Back-It by Gazelle Systems ...........02005: New 100 
Disk Optimizer by Softlogic Systems ............55. 60 
FASTBACK by 5th Generation Systems ............. 179 
XenoCopy-PC dy XenoSoft .............0005. New 80 
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dos utilities 


Command Plus by FSP Software ..........-++5+05 80 
FANSI-CONSOLE dy Hersey Micro .........--+-+-: 75 
Norton Commander by Peter Norton .........--.+-: 75 
OPAL Shell Language by Software Factory ...... New 99 
Q-DOS II by Gazelle Systems .........-++2055 New 70 
Taskview by Sunny Hill Software ........-+4++05: 80 
essential products 
C Utility Liblaty x. cn saad weeeewseses eeu 185 
Essential Comm Library with Debugger ..........--- 250 
Essential Comm Library Software Only ........... 185 
Breakout Debugger Only Any /anguage........... 125 
Essential Graphics ............-.- 000s ee eee ees 250 
forth language 
CFORTH Wative Code Compiler by LM/ ..........-.-- 300 
Forth/83 Metacompiler Specify Target ..........--- 750 
PC/Forth by Laboratory Microsystems...........+++ 150 
PC/Forth+ by Laboratory Microsystems .........+-. 250 
Advanced Color Graphics Support .............. 100 
Enhanced Graphics Support ...............-.-- 200 
Intel 8087 Support .............-. esse eeeee 100 
Interactive Symbolic Debugger.............-.-- 100 
Native Code Optimizer ............2250020005 100 
Software Floating Point...................--. 100 
UR/ Forth by: 1M) 6.6 ioe wee css cennasena i sedee 350 
Object Module Libraries.................--4-- 500 
fortran language 
50 MORE: FORTRAN dy Peerless Engr..........--- 125 
ACS Time Series by Alpha Computer Service ........ 495 
Essential Graphics by Fssential Software ........... 250 
Forlib-Plus by A/pha Computer Service ..........+.- 70 
FORTLIB by Sutrasoll ....22502ss00cnseasie cece 125 
FORTRAN Addendum dy /mpulse Engr ...........--- 95 
FORTRAN Addenda by /mpulse Engr..........++4-. 165 
GRAFLIB by SUGasOll oc vace ons ee eds 9 eee eee 175 
HALO Graphics hy Media Cybernetics ............-- 300 
1/0 PRO by MEF Environmental ............+4+++ 149 
Microcompatibles Combo Package..............-- 240 
GratOl occa chant cain ed asS sets bapexas es 135 
PIONNOUO oso.c 5 cn oad c¥h een ot ceews ss eeate8 Sx 135 
Microsoft FORTRAN w/CodeView ...............- 450 
No Limit by MEF Environmental.............00005- 129 
Numerical Analyst by MAGUS. .............5-005: 295 
PANEL by Roundhill Computer Systems ..........+-- 295 
PLOTHP by Sutrasoft’....655 055 s0cccecense waren 175 
RM/FORTRAN dy Ayan-McFarland .............-+- 595 
RTC PLUS Fortran to C by Cobalt Blue ............. 450 
Scientific Subroutine Lib by Peerless .............. 175 
Statistician by Alpha Computer Service ............- 295 
Statlib.GL: by PS//Systems ....0.200s02ssc0aeece ns 295 
Statlib. TSE: by PSI/SYStOMS «oo casein senstes sees 295 


Strings & Things by A/pha Computer Service ......... 70 
greenleaf products 


Greenleaf Comm Library ....................-.- 185 
Greenleaf Data Windows Library ................. 225 
WH SOUTCE COOP cic vicgxh eG 205s ive eee wee oe 0s 395 
Greenleaf Functions.....................-2000- 185 
help utilities 
HELP/ Gontsel by WOS 5 oe o5 cdc teasy eeanee eeeas 125 
On-line Help from Opt-Tech ............ 0. eee 149 
SoftScreen/HELP dy Dialectic Systems ............ 195 
lattice products 
Lattice C Compiler ver 3.2 from Lattice............. 500 
with Library Source Code ........... eee ee eens 900 
C Cross Reference Generator.................... 50 
Wi SOUEO COUE oc4050sa0044be a ee eSens ews 200 
C-Food Smorgasbord Function Library...........4.. 150 
WHE SOURS CODE ois o6 oe Bi 2 Shaded oosa hae es 300 
C-Sprite Source Leve/ Debugger ............00005: 175 
Curses Screen Manager ..........- 0. cee ee cence 125 
WHR SOUCO CONE vec eccvencxevescadcnsaawene 250 
dBC Specify dBC Il or DBC IM... cc eee 250 
With Source CONE ...5cc5 65000 28s bea ees eck ades 500 
GBC WPS sss cwiw se aesncdwre cesses cusses 750 
WAN SOUCO CONE coins doce Sienevienckesnevaan 1500 
LMK Make FOCHhY ccc x0 dance beves8as oie en tae's 195 
RPG 11 Combo A/ three items below............... 1100 
RPG Il Compiler Vo Aoyalties...............45. 750 
RPG 11 SEU Screen Entry Utility .. 0.2.0.0. .0.465. 250 
RPG Ui Sort/MGtge o. fice ots ucne5eis cece eee 250 
RPG Il Screen Design Aid Utility ................. 350 
SecretDisk Fi/e Encryption Utility ... 0.0.0.0... 006. 120 
SideTalk Resident Communications .............45+ 120 
SSP/PC Scientific Subroutine Library ...........4.4. 350 
Text Management Utilities ...................... 120 
TopView Toolbasket Function Library ............4. 250 
WHT SOULE CONE. os 6.65 4 ewes Sree saeenes eee 500 


metagraphics products 


LightWINDOW/C for Datalight C .............004. 95 
FontWiNDOW «.cccscssa vies cidaediveessweses 95 
FontWINDOW/PLUS......................006. 275 
MetaWINDOW Wo Royalties.............. 00.0 eee 195 
MetaWINDOW/PLUS ......................08. 275 
TurboWINDOW/C for Turbo C ow. cee 95 
TurboWINDOW/ Pascal for Turbo Pascal ........... 95 
micro focus products 
Micro Focus Level Il COBOL w/Animator........... 495 
Level 1 COBOL cs ciccpaus des eeneos Sa de¥e wus 349 
Level Il Animator .....................00008- 195 
Micro Focus Level 1! COBOL/ET for UNIX.......... CALL 
Micro Focus Personal COBOL ................... 149 
Micro Focus Professional COBOL ................ 2000 
Micro Focus VS COBOL/XENIX ................. 1495 
Micro Focus Support Products: 
COBOL/IO Ad hoc Report Writer ............... 495 
COBOL/IOQ for DOS 3.X Networks ............... 995 
POW SRE cos oS ks RC beeen soe e ean ewes 295 
SOURCEWRITER.........................2.. 995 








microport products 


System V/386 Combination................. New 799 
386 Runtime System .................... New 299 
386 Software Development System ......... New 399 
Text Preparation System ................. New 199 

386 Unlimited License Kit .................. New 299 

DOSMerge386 Aun DOS and UNIX together ..... New CALL 

System V/AT Combination...................... 549 
AT Runtime System ......................00. 199 
AT Software Development System .............. 249 
Text Preparation System ..................... 199 

AT Unlimited License Kit ....................... 249 

DOSMerge286 Aun DOS and UNIX together ..... New 149 

microsoft products 

Microsoft BASIC Compiler for XEM/X .......... New 695 

Microsoft BASIC Interpreter for XEW/X............. 350 

Microsoft C Compiler with CodeView .............. 450 

Microsoft COBOL Compiler with COBOL Tools........ 700 
TOKEN es ccnus Diets ae dneae pees yous eae 995 

Microsoft FORTRAN Optimizing Compiler/CodeView... 450 

Microsoft FORTRAN for XEMIX...............000. 695 

Microsoft Learning DOS ....................... 50 

Microsoft LISP Common LISP ..........0. 0000000 250 

Microsoft MACH 10 with Mouse & Windows ........ 549 

Microsoft MACH 10 Board only .................. 399 

Microsoft Macro Assembler..................... 150 

Microsoft Mouse Bus Version .............0.0000% 175 

Microsoft Mouse Seria/ Version ..............000 195 

Microsoft muMath /ncludes muSIMP................ 300 

Microsoft Pascal Compiler...................... 300 
WORKED vikn ds cauudek d2any che ewind au LOR es 695 

Microsoft QuickBASIC........... $20 Rebate Offer 99 

Microsoft Quick€.. 00... cc cee eee New 99 

MICTOSON SOM... 2 6s ss5va cds ean deve e¥edwoeas 195 

Microsoft Windows ..................0..00 000s 99 

Microsoft Windows Development Kit .............. 500 

WICIOSOE WIG os cc wactuce necks beGeenns eed ex 450 

modula-2 language 

EXE2LNK MASM Interface hy PM/ ............ New 49 

Macro2 Macro preprocessor by PM/ ........... New 89 

ModBase by PM/ ...............0 00 cece New 89 

MODULA-2 Apprentice Pkg by LOGITECH.......... 99 

MODULA-2 Magic Pkg by LOGITECH ............. 99 

MODULA-2 ROM Pkg & Cross RT Debugger ........ 299 

MODULA-2 Window Pkg by LOGITECH............ 49 

MODULA-2 Wizard's Pkg by LOGITECH ........... 199 

Heperore by PM oss cscs ches sae iade ss 89 

mouse products 

LOGIMOUSE BUS with PLUS Pkg by LOGITECH ...... 119 
with PLUS & PC Paintbrush... 6.0... oc eee 149 
with PLUS & CAD Software... 0... ccc cee 189 
with PLUS & CAD & Paint... 0. ccc ccc ees 219 

LOGIMOUSE C7 with PLUS Pkg, Specify Connector.... 119 
with PLUS & PC Paintbrush... 0... 0c cc cee 149 
with PLUS & CAD Software... 0.0... ec ee 189 
with PLUS & CAD & Paint... 0.0 ccc ccc cee 219 

Microsoft Mouse Bus Version............0.00000. 175 

Microsoft Mouse Seria/ Version .............0000. 195 

other languages 

ACTOR by Whitewater Group ................ New 495 

CCS MUMPS Single-User by MGlobal ............. 60 

CCS MUMPS Single-User Multi-Tasking ............ 150 

CCS MUMPS Multi-User... 6.0. eee 450 

Marshal Pascal by Marshal Language Systems ....... 189 

Pascal-2 by Oregon Software .............004. New 395 

Personal REXX by Mansfield Software ............. 125 

SNOBOL4+ by Catspaw ... 2... eee 95 

other products 

Dan Bricklin’s Demo Pgm dy Software Garden ....... 75 
Dan Bricklin’'s Demo Tutorial .................. 50 

Fast Forward by Mark Williams .............. New 70 

Informix A// Varieties by Informix ..........6 00000 CALL 

Instant Replay by Wostradamus ..............0004 150 

MKS Toolkit w/w Editor by MKS ....... New Version 139 

MicroTEX /ypesetting from Addison Wesley ..... New 295 

Net-Tools by BC Associates .......... 00.0. e eee 149 

OPT-Tech Sort by Opt-Tech Data Proc ............. 149 

PC/TOOLS dy Custom Software .............0 000 49 

Screen Machine by MicroHelp ..............0004. 79 

phoenix products 

Pasm86 Macro Assembler version 2.0.............4. 195 

Pdisk Hard Disk & Backup Utility... 0.0... eee 145 

Pfantasy Pac Phoenix Combo ..............00000- 995 

Pfinish Fxecution Profiler... 0.0.0... ccc cee ee 395 

Pfix8Gplus Symbolic Debugger .............00000- 395 

PforCe Specify C Compiler... 1... occ 395 

PforCe++ Specify C Compiler and C++ ............. 395 

Plink86plus Overlay Linker .... 0.0.20... eee eee ee 495 

Pmaker Make Utility... 0.0... ce eee 125 

Pmate Macro Text Fditor ..... 0.0... cc eee ee 195 

Pre LU oss enc bee i wrecdes cs sbsds tans 295 

Ptel Binary File Transfer Program ............6006. 195 

polytron products 

PolyBoost 7he Software Accelerator ..............-. 80 

Pee UN sos. Sica eee vas edbee sasadeedes 99 
PolyDesk Ill Archivist ...................004. 50 
PolyDesk Ill Cryptographer ................... 50 
PolyDesk Ill Talk... ........ 2... .. 0. ce eee eee 70 

PolyLibrarian Library Manager ..............6055. 99 

PolyLibrarian Wl Library Manager.............6045. 149 

PolyMake UM/X-like Make Facility... .......00.00005 149 





POW SUG cent cesses oe aoe taweae eee tee 149 
Polytron C Beautifier ...............0.00.0..... 50 
Porten © Library | 0. ec sac caeee 6 eee eveceu tees 99 
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LOWEST PRICES 
Due to printing lead times, some of our current 
prices may differ from those shown here. Call for 
latest pricing. 

FREE SHIPPING 
Orders within the USA (including Alaska & Hawaii) 
are shipped FREE via UPS. Express shipping is 
available at the shipping carrier's standard rate 
with no rush fees or handling charges. To avoid 
delays when ordering by mail, please call first to 
determine the exact cost of express shipping. 


CREDIT CARDS 
VISA and MasterCard are accepted at no extra 
cost. Your card is charged when your order is 
shipped. Mail orders please include credit card 
expiration date and authorized signature. 


CODs AND POs 
CODs and Purchase Orders are accepted at no 
extra cost. POs with net 30-day terms are available 
to qualified US accounts only. 


SALES TAX 
Orders outside of Ohio are not charged state sales 
tax. Ohio customers please add 6% Ohio tax or 
provide proof of tax-exemption. 


INTERNATIONAL ORDERS 

Shipping charges for International and Canadian 
orders are based on the shipping carrier's standard 
rate. Since rates vary between carriers, please call 
or write for the exact cost. International orders 
(except Canada), please include an additional $10 
for export preparation. All payments must be made 
with US funds drawn ona US bank. Please include 
your telephone number when ordering by mail. Due 
to government regulations, we cannot ship to all 
countries. 


VOLUME ORDERS . 
Volume orders may qualify for additional discounts. 
Call us for special pricing. 


SOUND ADVICE 
Our knowledgeable technical staff can answer 
technical questions, assist in comparing products 
and send you detailed product information tailored 
to your needs. 


30-NAY GUARANTEE 
Most of our products (excluding books) come with 
a 30-day documentation evaluation period or a 
30-day return guarantee. Please note that some 
manufacturers restrict us from offering guarantees 
on their products. Call for more information. 


MAIL ORDERS 
Please include your telephone number on all mail 
orders. Be sure to specify computer, operating 
system and any applicable compiler or hardware 
interface(s). Send mail orders to: 


Programmer's Connection 
Order Processing Department 
136 Sunnyside Street 
Hartville, OH 44632 


Call or write for our FREE comprehensive price guide. 


Hours: Weekdays 8:30 AM to 8:00 PM EST. 
CALL TOLL FREE 


USA: 222564 orn dees 800-336-1166 
CANADA....... samee 800-225-1166 
OHIO & ALASKA (Collect). 216-877-3781 
MELE ee sees Sagara ee 9102406879 
EASYLINK................ 62806530 
INTERNATIONAL....... 216-877-3781 


CUSTOMER SERVICE ... 216-877-1110 


©Copyright 1987 Programmer's Connection Incorporated. 











q ne database-language develop- 
er at the spring Comdex threw 


up his hands and squawked, ‘Whose 
idea was all this SOL stuff, anyway?’ 
This particular developer was of the 
opinion that an intelligent user ought 
to be able to structure his own que- 
ries and that if he couldn't, he proba- 
bly didn’t know what he wanted to 
know; he opined that SQL must be 
something foisted on developers by 
Esther Dyson. 

Philippe Kahn wants to know why 
price has ceased to be an issue wor- 
thy of discussion in the computer 
press. He thinks that users would be 
better served if more attention were 
paid to what they get for their dol- 
lars. In grinding the Borland Ax, Phi- 
lippe makes a fine point. Why in- 
deed would people who receive 
hordes of free review copies of soft- 
ware be insensitive to price and 
value? 

Aussie reader Richard Walding 
writes to ask if I’m sure about the 
genesis I presented in Fire in the Val- 
ley of the Apple Computer bitten ap- 
ple logo. “Alan Turing,’ he writes, 
“the man who laid the theoretical ba- 
sis of digital computing. . .ended his 
life by eating an apple covered with 
cyanide.”’ There seems to be some 
question about how the cyanide got 
into Turing’s system, but the bitten 
apple was there at the scene, and it is 
the sort of metaphor that would ap- 
peal to Wozniak, who priced his Ap- 
ple I at $666, the Biblical Number of 
the Beast. 

Which raises the question of what 
logo Bill Campbell will use for his 
new Apple software company when 
Apple spins off its in-house software 


development as an independent | 


company under Bill’s management. 
A candy-coated apple? 

Then there is the odd subscription 
inquiry: 

“Regarding your reply to our letter 
of April 1, 1987. You wrote that we 


should indicate which publication | 


we are requesting. Please note that 
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our client is asking for: 

Dr. Dobb’s Journal of Computer Tools 
Dr. Dobb’s Journal of Modular Tools 
Dr. Dobb’s Journal of Computer 
Calisthenics”’ 

He seems to think that in addition 
to Dr. Dobb’s Journal of Software 
Tools (to which he is already sub- 
scribing) there are three other Dr. 
Dobb’s Journals. Do you know any- 
thing about these other three Dr. 
Dobb’s? 

Some people, on the other hand, 
are all answers, like my entrepre- 
neurial cousin Corbett... . 

Cousin Corbett’s Secrets of Soft- 
ware Success, Part I: The Modern 
Software Product Life Cycle. 

The savvy software developer of 
today must keep pace with mercuri- 
al market conditions. The modern 
software product life cycle, or 
MSPLC, consists of the familiar 
phases of research, development, 
maintenance, and maturity, but in a 
streamlined form. 

Research. First, you must identify 
an appropriate market. Size alone is 
not important: lots of people use 
computers at home, yet there is no 
home market; on the other hand, 
there are only a few hundred com- 
puter-industry journalists, yet they 
constitute a market vital to your suc- 
cess. Industry writers found laptop 
computers extremely useful in their 
work and ensured their success, and 
a program that simulates flying an 
airplane has been successful in part 
because of its value to reviewers in 
evaluating IBM ROM BIOS compati- 
bility. So focus on products that bene- 
fit journalists. (N.B.: your time is pre- 





cious and should not be squandered 
on nonproducts, so write no code 
during this phase. If the research 
phase indicates that your idea has | 
market viability, announce a product 
and start taking orders.) 

Development. Once you have be- 
gun cashing checks you legally have 
only three months to produce some- 
thing. Many developers make the 
mistake of trying to do too much in 
this phase, resulting in missed deliv- 
ery dates and buggy software. Recog- 
nize this truth: three months is not 
enough time to write a_ useful 
application. 

The solution? Concentrate your ef- 
forts on the user interface. Develop 
your version 1.0 using one of the 
many programs for producing de- 
mos and mockups. This will give the 
user something to critique, establish 
your “look and feel’’ claims, and al- 
low you to concentrate on launching 
your full-scale user-funded promo- 
tional campaign. | 

Maintenance. In this stage, hire 
some coders to flesh out the product 
based on the useful feedback users 
will provide on the features they 
most want. Note that by postponing 
actual coding until this phase you 
have avoided the waste of creating 
unwanted features. 

Maturity. The maintenance phase 
ultimately produces Release 1.1, the 
first working version, and marks the 
beginning of the mature phase of the 
product's life. Don’t think that you 
can then relax, though—to keep the 
product viable you should produce a 
completely new version of the pack- 
aging at least twice a year. 
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Michael Swaine 
editor-in-chief 
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You'd Be Surprised Who Uses 


Essential Graphics Functions 


And some of our well-known customers would be just as 
surprised if they saw themselves in this ad. We don’t splash 
their names all over the place as a matter of professional 
courtesy. 


Let’s face it. Just because someone else uses a product 1s 
not reason enough to buy it. The clincher is that our 
programs run a documented 40% faster than the closest 
competitor. To complete the picture, our code is up to 
75% smaller due to efficient coding 

and the granularity _— 

of functions. = 


However, should 
curiosity get the best 
of you, call us at 
201-762-6965 and 
we'll drop a few 
highly impressive 
names on you. 


Behind every 
great program is a great library. 


Draw Your Own Conclusions 


When you’re responsible for a project that includes 
advanced graphics, “graphics windowing,’ or character 
font manipulation, Essential Graphics is the clear choice. 
We’ve taken the grind out of graphics programming and 
replaced it with speed and versatility. 


No Royalties, 30 Day Guarantee 


We believe that selling you a programming tool does not 
make us your co-authors. So we don’t charge any royalties 
or run time fees. If within 30 days you don’t find our 
library satisfactory, dump the whole thing and receive a 
complete refund. 









Functions At A Glance 


Seed filling in a boundary 
Clipping on screen 
coordinates 


Compiler Compatibility: 
e Microsoft, C, Fortran, 
Pascal 


Features: Graphics Adapters: 

e Fastest functions available e IBM Color Graphics 

e Dots, Lines, Circles, Arcs, e IBM Enhanced Graphics 
Pies, Bars e Hercules Graphics 

e Manipulate character fonts e AT&T, Olivetti Graphics 

@ Move blocks, do animation e Tecmar Graphics Master 

e User definable patterns e Others (Call) 

® 

® 











e Lattice C, Aztec C 

e Computer Innovations 
C86, DeSmet C 

e Wizard C, Mark Williams 


Devices Supported: 

e IBM, Epson, Oki printers 
e HP Plotters, HP Laser Jet 
e Microsoft, Logitech Mice 










$250.00 


Do Your Homework 
The library you buy can influence the rest of your 
programming life. We encourage you to do some checking 
before making a decision. When you’ve done your home- 
work, you’ll choose Essential. Call our support staff of 
experienced C programmers and find out before you buy 
how things will be after your check clears. 


To order or for support 
call: 201-762-6965 


For foreign orders contact: 


England: Gray Matter Tel. (0364) 53499 
Japan: Lifeboat Inc. of Japan Tel: 293 4711 
West Germany: Omnitex Tel. 07623-61820 


Essential Software, Inc. 
PO. Box 1003, Maplewood, New Jersey 07040 
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No matter where you take 
CROSSTALK’ Mk.4 oo , 


You won't encounter a PC communications program with as much versatility as 
CROSSTALK®MKk. 4. It has everything we could imagine you needing today. More 
protocols — X.PC, Xmodem, Kermit, and our own CROSSTALK. More terminal 
emulations, including complete IBM 3101, DEC VT- 100, and TeleVideo 900 
series. Concurrent communications capability — up to 15 sessions, each 
displayed.in its own expandable window, or on separate ‘‘pages.’’ Error — 
{high speeds. Prepared script files to extract information from _ 
most popular information utilities. A powerful programming language 
to create customized scripts. Finally, we've built-in a bit of tomorrov 
CROSSTALK Mk. 4 is based on a modular architecture that 1 
can add new capabilities by phone, as they come along. So y 
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